home *** CD-ROM | disk | FTP | other *** search
Text File | 1999-06-14 | 486.9 KB | 16,080 lines |
- //-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-//
- //- LOST SOUL ACT.2:鼓動 -//
- //-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-//
- //━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
- //グローバル変数定義
-
- //デバック用
- &def デバック=0 //デバックコマンドの使用
- &def 敵出現=0 //敵の出現 0:出現,1:出現しない
- &def 最強=0 //パーティーのレベル99 0:にしない,1:にする
-
- &def 平原=0
- &def 夜=0
-
- &def 選択1 //%select用
- &def 選択2 // 〃
- &def 選択3 // 〃
-
- &def 外X //フィールド セーブ時の座標取得
- &def 外Y // 〃
-
- &def X //汎用座標セット
- &def Y // 〃
-
- &def カウンタ
-
- &def 目印1 //ダンジョン目印
- &def 目印2 //ダンジョン目印
- &def 目印3 //ダンジョン目印
- &def 目印4 //ダンジョン目印
- &def 目印5 //ダンジョン目印
-
- &def IC1 //ダリムラクス 情報チェックフラグ
- &def IC2 // 〃
- &def IC3 // 〃
- &def IC4 // 〃
-
- &def 宝1 //盗賊のアジトの宝箱
- &def 宝2 //牢獄の宝箱
- &def 宝3 //アンヌ森林の宝箱
- &def 宝4 //砂漠の霧の宝箱
-
- &def 怪獣 //アンヌ森林での道しるべ
-
- &def 封印1 //砂漠の封印
- &def 封印2 // 〃
- &def 封印3 // 〃
- &def 封印4 // 〃
- &def 解除
-
- &def 敵出1 //盗賊のアジトでの最初のモンスター出現
- &def 敵出2 //牢獄での最初のモンスター出現
- &def 敵出3 //アンヌ森林での最初のモンスター出現
- &def 敵出4 //砂漠の霧での最初のモンスター出現
-
-
- &def 魔法国へ //リアナの旅立ち
- &def 不安 //カリスの動揺
-
- &def 進行=0 //ゲーム進行メインフラグ
- &def 町中 //町の中でのマップ切り替えによるBGM調整
- &def 町=1 //店・宿などで、どこの町かチェック
- //1:ダリムラクス,2:エイアム,3:セフラ,4:アルテガ,5:ティット,6:リーナス
- &def 所持金 //主にイベント前の%goldを代入。所持金の変化をチェック
- &def 船 //渡し場の位置 1:右,2:左
-
- //狩猟動物 1:捕獲回数,2:所持頭数
- //エリアA(クレイニル)
- &def ネズミ1
- &def ネズミ2
- &def ウサギ1
- &def ウサギ2
- &def タヌキ1
- &def タヌキ2
- &def イヌ1
- &def イヌ2
- //エリアB(クレイニル・アザム間)
- &def カラス1
- &def カラス2
- &def キツネ1
- &def キツネ2
- &def イノシシ1
- &def イノシシ2
- &def シカ1
- &def シカ2
- //エリアC(オルテニス)
- &def カエル1
- &def カエル2
- &def トカゲ1
- &def トカゲ2
- &def ウマ1
- &def ウマ2
- &def オオカミ1
- &def オオカミ2
- //エリアD(オルテニス・リアテリマ間)
- &def ワシ1
- &def ワシ2
- &def ヤギ1
- &def ヤギ2
- &def ヒョウ1
- &def ヒョウ2
- &def クマ1
- &def クマ2
- //エリアE(リアテリマ)
- &def サソリ1
- &def サソリ2
- &def ダチョウ1
- &def ダチョウ2
- &def ラクダ1
- &def ラクダ2
- &def ライオン1
- &def ライオン2
- //エリアF(リアテリマ・ロバック間)
- &def アルマジロ1
- &def アルマジロ2
- &def ワニ1
- &def ワニ2
- &def サイ1
- &def サイ2
- &def ゾウ1
- &def ゾウ2
- //全エリア(幻の動物)出現確率がめちゃくちゃ低い
- &def 白虎1
- &def 白虎2
- &def 青竜1
- &def 青竜2
- &def 朱雀1
- &def 朱雀2
- &def 玄武1
- &def 玄武2
-
- &def 獲物
- &def 獲物数
- &def 敵確率1
- &def 敵確率2
- &def 確変=1000
- &def 捕獲数
- &def 獣相場
- &def 獣売数
-
- &def 栞 //獣屋 獣選択時の獣番号
- &def 頭数 //獣屋 選択された獣の所持頭数
- &def 単価 //獣屋 選択された獣の販売単価
-
- &def 魔法のロープ=1 //1つ取るごとに捕獲数+10
-
-
-
- //━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
- [SUB]//サブルーチン
- &label 99
- %partydef(1) = {$9,0,$20,0,99,0,-1,-1,-1,-1}
- %partydef(2) = {$A,0,$40,1,99,1,-1,-1,-1,-1}
- %partydef(3) = {$B,0,$60,2,99,0,-1,-1,-1,-1}
- %partydef(4) = {$B,0,$80,3,99,1,-1,-1,-1,-1}
- %partydef(5) = {$C,0,$A0,4,99,0,-1,-1,-1,-1}
- %partydef(6) = {$C,0,$C0,5,99,1,-1,-1,-1,-1}
- %partydef(7) = {$B,1,$00,6,99,0,-1,-1,-1,-1}
- %partydef(8) = {$F,1,$20,6,99,0,-1,-1,-1,-1}
- &on
- &rts
- &label 地図表示
- &monsprint 64,64,MAP
- &monsprint 64+%px/4,64+%py/4,P
- &pause
- &monsprint 64,64,消し
- !o(1);f(捕獲数)
- &rts
-
- &label 全回復
- &bgm -1
- &contrast 0
- &wait 150
- &bgm 16
- &complete
- &wait 500
- &contrast 15
- &if(町==2 and 進行<12){
- &bgm 26
- }&else{
- &bgm 13
- }
- !o(1);HP・MPを完全に回復した!!pc
- &rts
-
-
- &label 装備奪い禁止 //引き数:仲間
-
- &if(仲間==3){ダル
- &if(%haveitem(テクレセント)==1){&partyitemout(テクレセント)}
- &if(%haveitem(ノバストプレート)==1){&partyitemout(ノバストプレート)}
- &if(%haveitem(ホガントレット)==1){&partyitemout(ホガントレット)}
- &if(%haveitem(ミバービュート)==1){&partyitemout(ミバービュート)}
- }
- &if(仲間==4){ルシェル
- &if(%haveitem(ネセプター)==1){&partyitemout(ネセプター)}
- &if(%haveitem(ハローブ)==1){&partyitemout(ハローブ)}
- &if(%haveitem(ヘプロテクション)==1){&partyitemout(ヘプロテクション)}
- &if(%haveitem(゚ロザリオ)==1){&partyitemout(゚ロザリオ)}
- }
- &if(仲間==7){//マクス、ジョン
- &if(%haveitem(トスピアー)==1){&partyitemout(トスピアー)}
- &if(%haveitem(ノレザーメイル)==1){&partyitemout(ノレザーメイル)}
- &if(%haveitem(マレザーグローブ)==1){&partyitemout(マレザーグローブ)}
- &if(%haveitem(ミレザーヘルム)==1){&partyitemout(ミレザーヘルム)}
-
- &if(%haveitem(トスピアー)==1){&partyitemout(トスピアー)}
- &if(%haveitem(ノレザーメイル)==1){&partyitemout(ノレザーメイル)}
- &if(%haveitem(マレザーグローブ)==1){&partyitemout(マレザーグローブ)}
- &if(%haveitem(ミレザーヘルム)==1){&partyitemout(ミレザーヘルム)}
- }
- &rts
-
- &label 発光石
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- &if(目印1==0){
- %mandef(1) ={$A , 0,$40, 2, -1} //発光石
- %manpoint(1)={%px,%py}
- &on
- 目印1=1
- &&
- }
- &if(目印2==0){
- %mandef(2) ={$A , 0,$40, 2, -1} //発光石
- %manpoint(2)={%px,%py}
- &on
- 目印2=1
- &&
- }
- &if(目印3==0){
- %mandef(3) ={$A , 0,$40, 2, -1} //発光石
- %manpoint(3)={%px,%py}
- &on
- 目印3=1
- &&
- }
- &if(目印4==0){
- %mandef(4) ={$A , 0,$40, 2, -1} //発光石
- %manpoint(4)={%px,%py}
- &on
- 目印4=1
- &&
- }
- &if(目印5==0){
- %mandef(5) ={$A , 0,$40, 2, -1} //発光石
- %manpoint(5)={%px,%py}
- &on
- 目印5=1
- &&
- }
- &rts
- &label 獣捕獲
- &bgm 30
- 獲物=獲物+1
- カウンタ=1
- &label
- &if(捕獲数+カウンタ>10*魔法のロープ){獲物数=カウンタ-1}//捕獲最大数検知
- &if(カウンタ<獲物数){
- カウンタ++
- &jmp @b
- }
- 捕獲数=捕獲数+獲物数
- &if(獲物==1){
- !o(1)b(0)j(2)狩猟結果j(0);
- ! 名前:j(2)ネズミj(0);
- ! 捕獲数:f(獲物数);
- ! 残り捕獲可能数:f(10*魔法のロープ-捕獲数)b(5)pc
- ネズミ1=ネズミ1+獲物数
- ネズミ2=ネズミ2+獲物数
- &rts
- }
- &if(獲物==2){
- !o(1)b(0)j(2)狩猟結果j(0);
- ! 名前:j(2)ウサギj(0);
- ! 捕獲数:f(獲物数);
- ! 残り捕獲可能数:f(10*魔法のロープ-捕獲数)b(5)pc
- ウサギ1=ウサギ1+獲物数
- ウサギ2=ウサギ2+獲物数
- &rts
- }
- &if(獲物==3){
- !o(1)b(0)j(2)狩猟結果j(0);
- ! 名前:j(2)タヌキj(0);
- ! 捕獲数:f(獲物数);
- ! 残り捕獲可能数:f(10*魔法のロープ-捕獲数)b(5)pc
- タヌキ1=タヌキ1+獲物数
- タヌキ2=タヌキ2+獲物数
- &rts
- }
- &if(獲物==4){
- !o(1)b(0)j(2)狩猟結果j(0);
- ! 名前:j(2)イヌj(0);
- ! 捕獲数:f(獲物数);
- ! 残り捕獲可能数:f(10*魔法のロープ-捕獲数)b(5)pc
- イヌ1=イヌ1+獲物数
- イヌ2=イヌ2+獲物数
- &rts
- }
- &if(獲物==5){
- !o(1)b(0)j(2)狩猟結果j(0);
- ! 名前:j(2)カラスj(0);
- ! 捕獲数:f(獲物数);
- ! 残り捕獲可能数:f(10*魔法のロープ-捕獲数)b(5)pc
- カラス1=カラス1+獲物数
- カラス2=カラス2+獲物数
- &rts
- }
- &if(獲物==6){
- !o(1)b(0)j(2)狩猟結果j(0);
- ! 名前:j(2)キツネj(0);
- ! 捕獲数:f(獲物数);
- ! 残り捕獲可能数:f(10*魔法のロープ-捕獲数)b(5)pc
- キツネ1=キツネ1+獲物数
- キツネ2=キツネ2+獲物数
- &rts
- }
- &if(獲物==7){
- !o(1)b(0)j(2)狩猟結果j(0);
- ! 名前:j(2)イノシシj(0);
- ! 捕獲数:f(獲物数);
- ! 残り捕獲可能数:f(10*魔法のロープ-捕獲数)b(5)pc
- イノシシ1=イノシシ1+獲物数
- イノシシ2=イノシシ2+獲物数
- &rts
- }
- &if(獲物==8){
- !o(1)b(0)j(2)狩猟結果j(0);
- ! 名前:j(2)シカj(0);
- ! 捕獲数:f(獲物数);
- ! 残り捕獲可能数:f(10*魔法のロープ-捕獲数)b(5)pc
- シカ1=シカ1+獲物数
- シカ2=シカ2+獲物数
- &rts
- }
- &if(獲物==9){
- !o(1)b(0)j(2)狩猟結果j(0);
- ! 名前:j(2)カエルj(0);
- ! 捕獲数:f(獲物数);
- ! 残り捕獲可能数:f(10*魔法のロープ-捕獲数)b(5)pc
- カエル1=カエル1+獲物数
- カエル2=カエル2+獲物数
- &rts
- }
- &if(獲物==10){
- !o(1)b(0)j(2)狩猟結果j(0);
- ! 名前:j(2)トカゲj(0);
- ! 捕獲数:f(獲物数);
- ! 残り捕獲可能数:f(10*魔法のロープ-捕獲数)b(5)pc
- トカゲ1=トカゲ1+獲物数
- トカゲ2=トカゲ2+獲物数
- &rts
- }
- &if(獲物==11){
- !o(1)b(0)j(2)狩猟結果j(0);
- ! 名前:j(2)ウマj(0);
- ! 捕獲数:f(獲物数);
- ! 残り捕獲可能数:f(10*魔法のロープ-捕獲数)b(5)pc
- ウマ1=ウマ1+獲物数
- ウマ2=ウマ2+獲物数
- &rts
- }
- &if(獲物==12){
- !o(1)b(0)j(2)狩猟結果j(0);
- ! 名前:j(2)オオカミj(0);
- ! 捕獲数:f(獲物数);
- ! 残り捕獲可能数:f(10*魔法のロープ-捕獲数)b(5)pc
- オオカミ1=オオカミ1+獲物数
- オオカミ2=オオカミ2+獲物数
- &rts
- }
- &if(獲物==13){
- !o(1)b(0)j(2)狩猟結果j(0);
- ! 名前:j(2)ワシj(0);
- ! 捕獲数:f(獲物数);
- ! 残り捕獲可能数:f(10*魔法のロープ-捕獲数)b(5)pc
- ワシ1=ワシ1+獲物数
- ワシ2=ワシ2+獲物数
- &rts
- }
- &if(獲物==14){
- !o(1)b(0)j(2)狩猟結果j(0);
- ! 名前:j(2)ヤギj(0);
- ! 捕獲数:f(獲物数);
- ! 残り捕獲可能数:f(10*魔法のロープ-捕獲数)b(5)pc
- ヤギ1=ヤギ1+獲物数
- ヤギ2=ヤギ2+獲物数
- &rts
- }
- &if(獲物==15){
- !o(1)b(0)j(2)狩猟結果j(0);
- ! 名前:j(2)ヒョウj(0);
- ! 捕獲数:f(獲物数);
- ! 残り捕獲可能数:f(10*魔法のロープ-捕獲数)b(5)pc
- ヒョウ1=ヒョウ1+獲物数
- ヒョウ2=ヒョウ2+獲物数
- &rts
- }
- &if(獲物==16){
- !o(1)b(0)j(2)狩猟結果j(0);
- ! 名前:j(2)クマj(0);
- ! 捕獲数:f(獲物数);
- ! 残り捕獲可能数:f(10*魔法のロープ-捕獲数)b(5)pc
- クマ1=クマ1+獲物数
- クマ2=クマ2+獲物数
- &rts
- }
- &if(獲物==17){
- !o(1)b(0)j(2)狩猟結果j(0);
- ! 名前:j(2)サソリj(0);
- ! 捕獲数:f(獲物数);
- ! 残り捕獲可能数:f(10*魔法のロープ-捕獲数)b(5)pc
- サソリ1=サソリ1+獲物数
- サソリ2=サソリ2+獲物数
- &rts
- }
- &if(獲物==18){
- !o(1)b(0)j(2)狩猟結果j(0);
- ! 名前:j(2)ダチョウj(0);
- ! 捕獲数:f(獲物数);
- ! 残り捕獲可能数:f(10*魔法のロープ-捕獲数)b(5)pc
- ダチョウ1=ダチョウ1+獲物数
- ダチョウ2=ダチョウ2+獲物数
- &rts
- }
- &if(獲物==19){
- !o(1)b(0)j(2)狩猟結果j(0);
- ! 名前:j(2)ラクダj(0);
- ! 捕獲数:f(獲物数);
- ! 残り捕獲可能数:f(10*魔法のロープ-捕獲数)b(5)pc
- ラクダ1=ラクダ1+獲物数
- ラクダ2=ラクダ2+獲物数
- &rts
- }
- &if(獲物==20){
- !o(1)b(0)j(2)狩猟結果j(0);
- ! 名前:j(2)ライオンj(0);
- ! 捕獲数:f(獲物数);
- ! 残り捕獲可能数:f(10*魔法のロープ-捕獲数)b(5)pc
- ライオン1=ライオン1+獲物数
- ライオン2=ライオン2+獲物数
- &rts
- }
- &if(獲物==21){
- !o(1)b(0)j(2)狩猟結果j(0);
- ! 名前:j(2)アルマジロj(0);
- ! 捕獲数:f(獲物数);
- ! 残り捕獲可能数:f(10*魔法のロープ-捕獲数)b(5)pc
- アルマジロ1=アルマジロ1+獲物数
- アルマジロ2=アルマジロ2+獲物数
- &rts
- }
- &if(獲物==22){
- !o(1)b(0)j(2)狩猟結果j(0);
- ! 名前:j(2)ワニj(0);
- ! 捕獲数:f(獲物数);
- ! 残り捕獲可能数:f(10*魔法のロープ-捕獲数)b(5)pc
- ワニ1=ワニ1+獲物数
- ワニ2=ワニ2+獲物数
- &rts
- }
- &if(獲物==23){
- !o(1)b(0)j(2)狩猟結果j(0);
- ! 名前:j(2)サイj(0);
- ! 捕獲数:f(獲物数);
- ! 残り捕獲可能数:f(10*魔法のロープ-捕獲数)b(5)pc
- サイ1=サイ1+獲物数
- サイ2=サイ2+獲物数
- &rts
- }
- &if(獲物==24){
- !o(1)b(0)j(2)狩猟結果j(0);
- ! 名前:j(2)ゾウj(0);
- ! 捕獲数:f(獲物数);
- ! 残り捕獲可能数:f(10*魔法のロープ-捕獲数)b(5)pc
- ゾウ1=ゾウ1+獲物数
- ゾウ2=ゾウ2+獲物数
- &rts
- }
- &if(獲物==25){
- !o(1)b(0)j(2)狩猟結果j(0);
- ! 名前:j(2)白虎j(0);
- ! 捕獲数:f(獲物数);
- ! 残り捕獲可能数:f(10*魔法のロープ-捕獲数)b(5)pc
- 白虎1=白虎1+獲物数
- 白虎2=白虎2+獲物数
- &rts
- }
- &if(獲物==26){
- !o(1)b(0)j(2)狩猟結果j(0);
- ! 名前:j(2)青竜j(0);
- ! 捕獲数:f(獲物数);
- ! 残り捕獲可能数:f(10*魔法のロープ-捕獲数)b(5)pc
- 青竜1=青竜1+獲物数
- 青竜2=青竜2+獲物数
- &rts
- }
- &if(獲物==27){
- !o(1)b(0)j(2)狩猟結果j(0);
- ! 名前:j(2)朱雀j(0);
- ! 捕獲数:f(獲物数);
- ! 残り捕獲可能数:f(10*魔法のロープ-捕獲数)b(5)pc
- 朱雀1=朱雀1+獲物数
- 朱雀2=朱雀2+獲物数
- &rts
- }
- &if(獲物==28){
- !o(1)b(0)j(2)狩猟結果j(0);
- ! 名前:j(2)玄武j(0);
- ! 捕獲数:f(獲物数);
- ! 残り捕獲可能数:f(10*魔法のロープ-捕獲数)b(5)pc
- 玄武1=玄武1+獲物数
- 玄武2=玄武2+獲物数
- &rts
- }
- &rts
-
- &label 獣表示
-
- &if(栞==1){
- &if(ネズミ1>0){
- 頭数=ネズミ2
- 単価=20*獣相場/10
- &monsprint 24,24,売ネズミ
- !o(1)b(0)j(2)f(栞)j(0)名前:ネズミ;
- !捕獲回数:f(ネズミ1);
- !所持頭数:j(2)f(ネズミ2)j(0)/f(捕獲数);
- !買取単価:f(単価)b(5)
- &rts
- }
- &jmp 未捕獲
- }
- &if(栞==2){
- &if(ウサギ1>0){
- 頭数=ウサギ2
- 単価=50*獣相場/10
- &monsprint 24,24,売ウサギ
- !o(1)b(0)j(2)f(栞)j(0)名前:ウサギ;
- !捕獲回数:f(ウサギ1);
- !所持頭数:j(2)f(ウサギ2)j(0)/f(捕獲数);
- !買取単価:f(単価)b(5)
- &rts
- }
- &jmp 未捕獲
- }
- &if(栞==3){
- &if(タヌキ1>0){
- 頭数=タヌキ2
- 単価=80*獣相場/10
- &monsprint 24,24,売タヌキ
- !o(1)b(0)j(2)f(栞)j(0)名前:タヌキ;
- !捕獲回数:f(タヌキ1);
- !所持頭数:j(2)f(タヌキ2)j(0)/f(捕獲数);
- !買取単価:f(単価)b(5)
- &rts
- }
- &jmp 未捕獲
- }
- &if(栞==4){
- &if(イヌ1>0){
- 頭数=イヌ2
- 単価=70*獣相場/10
- &monsprint 24,24,売イヌ
- !o(1)b(0)j(2)f(栞)j(0)名前:イヌ;
- !捕獲回数:f(イヌ1);
- !所持頭数:j(2)f(イヌ2)j(0)/f(捕獲数);
- !買取単価:f(単価)b(5)
- &rts
- }
- &jmp 未捕獲
- }
- &if(栞==5){
- &if(カラス1>0){
- 頭数=カラス2
- 単価=30*獣相場/10
- &monsprint 24,24,売カラス
- !o(1)b(0)j(2)f(栞)j(0)名前:カラス;
- !捕獲回数:f(カラス1);
- !所持頭数:j(2)f(カラス2)j(0)/f(捕獲数);
- !買取単価:f(単価)b(5)
- &rts
- }
- &jmp 未捕獲
- }
- &if(栞==6){
- &if(キツネ1>0){
- 頭数=キツネ2
- 単価=100*獣相場/10
- &monsprint 24,24,売キツネ
- !o(1)b(0)j(2)f(栞)j(0)名前:キツネ;
- !捕獲回数:f(キツネ1);
- !所持頭数:j(2)f(キツネ2)j(0)/f(捕獲数);
- !買取単価:f(単価)b(5)
- &rts
- }
- &jmp 未捕獲
- }
- &if(栞==7){
- &if(イノシシ1>0){
- 頭数=イノシシ2
- 単価=140*獣相場/10
- &monsprint 24,24,売イノシシ
- !o(1)b(0)j(2)f(栞)j(0)名前:イノシシ;
- !捕獲回数:f(イノシシ1);
- !所持頭数:j(2)f(イノシシ2)j(0)/f(捕獲数);
- !買取単価:f(単価)b(5)
- &rts
- }
- &jmp 未捕獲
- }
- &if(栞==8){
- &if(シカ1>0){
- 頭数=シカ2
- 単価=160*獣相場/10
- &monsprint 24,24,売シカ
- !o(1)b(0)j(2)f(栞)j(0)名前:シカ;
- !捕獲回数:f(シカ1);
- !所持頭数:j(2)f(シカ2)j(0)/f(捕獲数);
- !買取単価:f(単価)b(5)
- &rts
- }
- &jmp 未捕獲
- }
- &if(栞==9){
- &if(カエル1>0){
- 頭数=カエル2
- 単価=20*獣相場/10
- &monsprint 24,24,売カエル
- !o(1)b(0)j(2)f(栞)j(0)名前:カエル;
- !捕獲回数:f(カエル1);
- !所持頭数:j(2)f(カエル2)j(0)/f(捕獲数);
- !買取単価:f(単価)b(5)
- &rts
- }
- &jmp 未捕獲
- }
- &if(栞==10){
- &if(トカゲ1>0){
- 頭数=トカゲ2
- 単価=40*獣相場/10
- &monsprint 24,24,売トカゲ
- !o(1)b(0)j(2)f(栞)j(0)名前:トカゲ;
- !捕獲回数:f(トカゲ1);
- !所持頭数:j(2)f(トカゲ2)j(0)/f(捕獲数);
- !買取単価:f(単価)b(5)
- &rts
- }
- &jmp 未捕獲
- }
- &if(栞==11){
- &if(ウマ1>0){
- 頭数=ウマ2
- 単価=300*獣相場/10
- &monsprint 24,24,売ウマ
- !o(1)b(0)j(2)f(栞)j(0)名前:ウマ;
- !捕獲回数:f(ウマ1);
- !所持頭数:j(2)f(ウマ2)j(0)/f(捕獲数);
- !買取単価:f(単価)b(5)
- &rts
- }
- &jmp 未捕獲
- }
- &if(栞==12){
- &if(オオカミ1>0){
- 頭数=オオカミ2
- 単価=180*獣相場/10
- &monsprint 24,24,売オオカミ
- !o(1)b(0)j(2)f(栞)j(0)名前:オオカミ;
- !捕獲回数:f(オオカミ1);
- !所持頭数:j(2)f(オオカミ2)j(0)/f(捕獲数);
- !買取単価:f(単価)b(5)
- &rts
- }
- &jmp 未捕獲
- }
- &if(栞==13){
- &if(ワシ1>0){
- 頭数=ワシ2
- 単価=200*獣相場/10
- &monsprint 24,24,売ワシ
- !o(1)b(0)j(2)f(栞)j(0)名前:ワシ;
- !捕獲回数:f(ワシ1);
- !所持頭数:j(2)f(ワシ2)j(0)/f(捕獲数);
- !買取単価:f(単価)b(5)
- &rts
- }
- &jmp 未捕獲
- }
- &if(栞==14){
- &if(ヤギ1>0){
- 頭数=ヤギ2
- 単価=180*獣相場/10
- &monsprint 24,24,売ヤギ
- !o(1)b(0)j(2)f(栞)j(0)名前:ヤギ;
- !捕獲回数:f(ヤギ1);
- !所持頭数:j(2)f(ヤギ2)j(0)/f(捕獲数);
- !買取単価:f(単価)b(5)
- &rts
- }
- &jmp 未捕獲
- }
- &if(栞==15){
- &if(ヒョウ1>0){
- 頭数=ヒョウ2
- 単価=350*獣相場/10
- &monsprint 24,24,売ヒョウ
- !o(1)b(0)j(2)f(栞)j(0)名前:ヒョウ;
- !捕獲回数:f(ヒョウ1);
- !所持頭数:j(2)f(ヒョウ2)j(0)/f(捕獲数);
- !買取単価:f(単価)b(5)
- &rts
- }
- &jmp 未捕獲
- }
- &if(栞==16){
- &if(クマ1>0){
- 頭数=クマ2
- 単価=400*獣相場/10
- &monsprint 24,24,売クマ
- !o(1)b(0)j(2)f(栞)j(0)名前:クマ;
- !捕獲回数:f(クマ1);
- !所持頭数:j(2)f(クマ2)j(0)/f(捕獲数);
- !買取単価:f(単価)b(5)
- &rts
- }
- &jmp 未捕獲
- }
- &if(栞==17){
- &if(サソリ1>0){
- 頭数=サソリ2
- 単価=80*獣相場/10
- &monsprint 24,24,売サソリ
- !o(1)b(0)j(2)f(栞)j(0)名前:サソリ;
- !捕獲回数:f(サソリ1);
- !所持頭数:j(2)f(サソリ2)j(0)/f(捕獲数);
- !買取単価:f(単価)b(5)
- &rts
- }
- &jmp 未捕獲
- }
- &if(栞==18){
- &if(ダチョウ1>0){
- 頭数=ダチョウ2
- 単価=280*獣相場/10
- &monsprint 24,24,売ダチョウ
- !o(1)b(0)j(2)f(栞)j(0)名前:ダチョウ;
- !捕獲回数:f(ダチョウ1);
- !所持頭数:j(2)f(ダチョウ2)j(0)/f(捕獲数);
- !買取単価:f(単価)b(5)
- &rts
- }
- &jmp 未捕獲
- }
- &if(栞==19){
- &if(ラクダ1>0){
- 頭数=ラクダ2
- 単価=350*獣相場/10
- &monsprint 24,24,売ラクダ
- !o(1)b(0)j(2)f(栞)j(0)名前:ラクダ;
- !捕獲回数:f(ラクダ1);
- !所持頭数:j(2)f(ラクダ2)j(0)/f(捕獲数);
- !買取単価:f(単価)b(5)
- &rts
- }
- &jmp 未捕獲
- }
- &if(栞==20){
- &if(ライオン1>0){
- 頭数=ライオン2
- 単価=500*獣相場/10
- &monsprint 24,24,売ライオン
- !o(1)b(0)j(2)f(栞)j(0)名前:ライオン;
- !捕獲回数:f(ライオン1);
- !所持頭数:j(2)f(ライオン2)j(0)/f(捕獲数);
- !買取単価:f(単価)b(5)
- &rts
- }
- &jmp 未捕獲
- }
- &if(栞==21){
- &if(アルマジロ1>0){
- 頭数=アルマジロ2
- 単価=250*獣相場/10
- &monsprint 24,24,売アルマジロ
- !o(1)b(0)j(2)f(栞)j(0)名前:アルマジロ;
- !捕獲回数:f(アルマジロ1);
- !所持頭数:j(2)f(アルマジロ2)j(0)/f(捕獲数);
- !買取単価:f(単価)b(5)
- &rts
- }
- &jmp 未捕獲
- }
- &if(栞==22){
- &if(ワニ1>0){
- 頭数=ワニ2
- 単価=320*獣相場/10
- &monsprint 24,24,売ワニ
- !o(1)b(0)j(2)f(栞)j(0)名前:ワニ;
- !捕獲回数:f(ワニ1);
- !所持頭数:j(2)f(ワニ2)j(0)/f(捕獲数);
- !買取単価:f(単価)b(5)
- &rts
- }
- &jmp 未捕獲
- }
- &if(栞==23){
- &if(サイ1>0){
- 頭数=サイ2
- 単価=420*獣相場/10
- &monsprint 24,24,売サイ
- !o(1)b(0)j(2)f(栞)j(0)名前:サイ;
- !捕獲回数:f(サイ1);
- !所持頭数:j(2)f(サイ2)j(0)/f(捕獲数);
- !買取単価:f(単価)b(5)
- &rts
- }
- &jmp 未捕獲
- }
- &if(栞==24){
- &if(ゾウ1>0){
- 頭数=ゾウ2
- 単価=550*獣相場/10
- &monsprint 24,24,売ゾウ
- !o(1)b(0)j(2)f(栞)j(0)名前:ゾウ;
- !捕獲回数:f(ゾウ1);
- !所持頭数:j(2)f(ゾウ2)j(0)/f(捕獲数);
- !買取単価:f(単価)b(5)
- &rts
- }
- &jmp 未捕獲
- }
- &if(栞==25){
- &if(白虎1>0){
- 頭数=白虎2
- 単価=2000*獣相場/10
- &monsprint 24,24,売白虎
- !o(1)b(0)j(2)f(栞)j(0)名前:白虎;
- !捕獲回数:f(白虎1);
- !所持頭数:j(2)f(白虎2)j(0)/f(捕獲数);
- !買取単価:f(単価)b(5)
- &rts
- }
- &jmp 未捕獲
- }
- &if(栞==26){
- &if(青竜1>0){
- 頭数=青竜2
- 単価=3000*獣相場/10
- &monsprint 24,24,売青竜
- !o(1)b(0)j(2)f(栞)j(0)名前:青竜;
- !捕獲回数:f(青竜1);
- !所持頭数:j(2)f(青竜2)j(0)/f(捕獲数);
- !買取単価:f(単価)b(5)
- &rts
- }
- &jmp 未捕獲
- }
- &if(栞==27){
- &if(朱雀1>0){
- 頭数=朱雀2
- 単価=2800*獣相場/10
- &monsprint 24,24,売朱雀
- !o(1)b(0)j(2)f(栞)j(0)名前:朱雀;
- !捕獲回数:f(朱雀1);
- !所持頭数:j(2)f(朱雀2)j(0)/f(捕獲数);
- !買取単価:f(単価)b(5)
- &rts
- }
- &jmp 未捕獲
- }
- &if(栞==28){
- &if(玄武1>0){
- 頭数=玄武2
- 単価=2500*獣相場/10
- &monsprint 24,24,売玄武
- !o(1)b(0)j(2)f(栞)j(0)名前:玄武;
- !捕獲回数:f(玄武1);
- !所持頭数:j(2)f(玄武2)j(0)/f(捕獲数);
- !買取単価:f(単価)b(5)
- &rts
- }
- &jmp 未捕獲
- }
-
- &label 未捕獲
- &monsprint 24,24,枠
- &if(栞<10){
- !o(1)b(0)j(2)f(栞)j(0)名前:????j(0);
- }&else{
- !o(1)b(0)j(2)f(栞)j(0)名前:????j(0);
- }
- !捕獲回数:f(0);
- !所持頭数:f(0)/f(捕獲数);
- !買取単価:f(0)b(5)
- 頭数=0
- 単価=0
- &rts
-
- &label 獣所持数減
- 捕獲数=捕獲数-獣売数
- カウンタ=1
- &label
- &if(栞==1){
- ネズミ2=ネズミ2-獣売数
- &rts
- }
- &if(栞==2){
- ウサギ2=ウサギ2-獣売数
- &rts
- }
- &if(栞==3){
- タヌキ2=タヌキ2-獣売数
- &rts
- }
- &if(栞==4){
- イヌ2=イヌ2-獣売数
- &rts
- }
- &if(栞==5){
- カラス2=カラス2-獣売数
- &rts
- }
- &if(栞==6){
- キツネ2=キツネ2-獣売数
- &rts
- }
- &if(栞==7){
- イノシシ2=イノシシ2-獣売数
- &rts
- }
- &if(栞==8){
- シカ2=シカ2-獣売数
- &rts
- }
- &if(栞==9){
- カエル2=カエル2-獣売数
- &rts
- }
- &if(栞==10){
- トカゲ2=トカゲ2-獣売数
- &rts
- }
- &if(栞==11){
- ウマ2=ウマ2-獣売数
- &rts
- }
- &if(栞==12){
- オオカミ2=オオカミ2-獣売数
- &rts
- }
- &if(栞==13){
- ワシ2=ワシ2-獣売数
- &rts
- }
- &if(栞==14){
- ヤギ2=ヤギ2-獣売数
- &rts
- }
- &if(栞==15){
- ヒョウ2=ヒョウ2-獣売数
- &rts
- }
- &if(栞==16){
- クマ2=クマ2-獣売数
- &rts
- }
- &if(栞==17){
- サソリ2=サソリ2-獣売数
- &rts
- }
- &if(栞==18){
- ダチョウ2=ダチョウ2-獣売数
- &rts
- }
- &if(栞==19){
- ラクダ2=ラクダ2-獣売数
- &rts
- }
- &if(栞==20){
- ライオン2=ライオン2-獣売数
- &rts
- }
- &if(栞==21){
- アルマジロ2=アルマジロ2-獣売数
- &rts
- }
- &if(栞==22){
- ワニ2=ワニ2-獣売数
- &rts
- }
- &if(栞==23){
- サイ2=サイ2-獣売数
- &rts
- }
- &if(栞==24){
- ゾウ2=ゾウ2-獣売数
- &rts
- }
- &if(栞==25){
- 白虎2=白虎2-獣売数
- &rts
- }
- &if(栞==26){
- 青竜2=青竜2-獣売数
- &rts
- }
- &if(栞==27){
- 朱雀2=朱雀2-獣売数
- &rts
- }
- &if(栞==28){
- 玄武2=玄武2-獣売数
- &rts
- }
- &rts
-
- //町コマンド情報収集 目的の項目
- &label 目的
- &if(進行==1){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);リザレアに関する情報。;あと他
- !に、役立ちそうな情報がないか聞いてみよう。
- !pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);はーい!;この先にある食堂のお
- !豆スープが美味しいそうよpc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…そういうのはいいよ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);えっ、なんでー?pc
- }
- &if(進行==3){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);明日はダルの依頼を受けて、街
- !道を塞いでいる岩を壊しに行く。p;リアナ、
- !大丈夫か?pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);うん、どうかな?p;小さい岩な
- !ら壊してみたことあるんだけど…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);おい、wいつの間にそんなことし
- !てたんだ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);カリスが出ていくって聞いて、
- !ちょっとムカついてたから、はらいせにね
- !pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);そ、wそうなのか…。p
- !o(1)j(2)カリスj(0);(…リアナ、それはちょっと怖
- !いぞ)pc
- }
- &if(進行==5){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);町の外でダルが待っているはず
- !だから、準備を整えたら早く合流しよう。p
- !c
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);うん、街道を通れるようにして
- !あげなきゃね。pc
- }
- &if(進行==6){
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);崖崩れの現場は町を出て街道をま
- !っすぐ北に行った場所だ。pc
- }
- &if(進行==9){
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);急いで、町の者を救出しなければ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、北東の山にある盗賊のアジトへ急ごう!pc
- }
- &if(進行==14){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);エイアムの北にある渡し場から川を越えて聖国オ
- !ルテニスに渡らないと。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);そして、首都アルテガに行って、;そこの図書館で
- !リザレアについて調べるんだよね。pc
- }
- &if(進行==18){
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);今夜は宿に泊まって、明日はアルテガに向かうん
- !だよね。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、アルテガの図書館に行けばリザレアのてが
- !かりが得られるかもしれない。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);うん、きっと見つかるよ。pc
- }
- &if(進行==19 or 進行==20){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);セフラから街道を西に向かって、アルテガへ向かわなければ
- !。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);アルテガの図書館でリザレアについて調べないと
- !ね。pc
- }
- &if(進行==21){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);アルテガの図書館でリザレアについて調べなけれ
- !ばな。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);うん。;さ、早く図書館へ行こう。pc
- }
- &if(進行==23){
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);図書館の入館許可証も手に入れたし。;やっと図書
- !館に入れるね。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、図書館へ急ごう。pc
- }
- &if(進行==29){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);急いでオスカーという人の診療所を探さなければ
- !。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)カリスj(0);はい、早くリアナさんを治療してもらわないと。pc
- }
- &if(進行==31){
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);アンヌ森林。;このティットを出て、西の方角で
- !したよね。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、早く薬草を取ってこよう。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);…魔物がいるんですよね。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);だから、準備はキッチリしていこう。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);そうですね…。p
- !o(1)j(2)ルシェルj(0);(アンヌ森林の魔物。;メシア様、ご無事でいて
- !下さい)pc
- }
- &if(進行==35 or 進行==36){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);砂漠に霧かぁ…。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);いったいどういうことなのかしら。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);まあ、とにかく南へ進めばはっきりするさ。pc
- }
- &if(進行==36 or 進行==37){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);一体、あの霧はなんなんだ。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);霧、あれは結界。;おそらく、何者
- !かが何かを企んでるんでしょけど…。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);とにかく、あの霧の奥まで進めば原因がはっ
- !きりするはずだ。pc
- }
- &if(進行>=42 and 進行<46){
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);船の準備が出来るまで、そのへんをブラブラとし
- !てましょう。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);準備って、2、3日って言ってたけど。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);リーナスに居れば準備が出来次第、アゼルが声を
- !かけてくれるわ。pc
- }
- &if(進行==46){
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);さあ、東大陸へ向かう船の準備は出来ている。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);あとはこっちの装備やなんかの準備が整い次第、
- !出発ね。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);準備が済んだらリーナス港へ向かえばいいんだな。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);ああ、そうだ。pc
- }
- &rts
- //町コマンド情報収集 目的の項目(後編)
- &label その他
- &if(不安==1){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);準備が済んだらリーナス港へ向かえばいいんだな。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);あとはこっちの準備が整い次第、出発ね。pc
- }
- &if(不安==2){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);辺境の東大陸、そこは一体どんな場所なんだろう。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);探検家や学者たちの調べじゃ、いくつかの少数部
- !族がいて、それぞれに集落を形成しているそうよ。p;
- !文化的には今の私たちの一世代前ぐらいって聞いたけど。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ということは、彼らと幾らかの接触がなされてい
- !るということなのか?pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);ええ、外から来た者に対して友好的な部族がいる
- !みたいよ。p;でも中には攻撃的な部族もいて犠牲者も出ている
- !そうよ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ふーん、なるほどねぇ。pc
- }
- &if(不安==3){
- &if(魔法国へ==2){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(リアナはいまごろどうしてるんだろう…)pc
- }&else{
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(リアナはもう島に帰っている頃だろうな…)pc
- }
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);どうしたの?;リアナって娘のことでも考えてたの
- !かしら。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);えっ、いや…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(な、なんだ、メシアってやつは人の心を読んだ
- !り出来るのか!?)pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);もう、そう猜疑的な目で見ないでよ。;別に心を読
- !んだりなんて力は無いわよ。p;
- !あなたの顔を見れば一発よ、誰かを想っている顔。p;病院で彼
- !女を見舞っていた時の顔だったわ。;とても愛しそうな。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);よ、よしてくれよ。p;彼女はオレが軽はずみに同行
- !をさせたせいであんな目にあわせてしまったんだ。p;オレにはそん
- !な資格は無いよ。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);資格って…。;pあなたは傷ついた彼女を救うため
- !に必死に頑張ったんじゃないの。;p彼女を背負い長い道のりを
- !歩いて、w薬草を手に入れるために魔物の森に入る危険を冒して
- !、w彼女のために精いっぱいだったんじゃないの。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);それは、リアナに対する責任だよ。そんな…。p
- !o(1)j(2)カリスj(0);(確かにそんな気持ちが、リアナを愛しく想う気
- !持ちがあったのかも知れない。p;そう島で初めて出会った時か
- !ら何かを感じていた。p;穏やかな陽射しのような、静かな蒼い
- !海の潮騒のような…)p
- !o(1)j(2)カリスj(0);だけど、オレは自分が何者なのかすらわからない
- !んだ。p;自身すら信じられないのに他人を信じて愛するなんて
- !、そんなことは出来ない。pc
- &wait 2
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);…カリス、誰だって自分に完璧な自信なんて持て
- !ちゃいないわ。;pでも、信じようとすることが一番大事なこと
- !よ。p;他人を信じることも、それは自分を信じることと変わらな
- !いわ。p;
- !もちろんあなたが過去の記憶を取り戻すことは大事なことだと
- !思うわ。p;だけどそれはあなたが他人を信じたり、愛したりする
- !こととは関係ないはずよ。p;
- !私もアゼルもあなたのことを信じれるわ。;きっとリアナだっ
- !てあなたのことを信じてあなたに付いて来たんでしょ。p;それ
- !は彼女が彼女自身を信じているからだわ。;だからカリスも自
- !分のこと、w私たちのことを、wリアナのことを信じて。p;過去よ
- !りも今の自分を信じて。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…ありがとう、ダリア。p
- !o(1)j(2)カリスj(0);(だけど、記憶を取り戻した時、オレは今の自分
- !でいられるのか。p;みんなが信じてくれているオレでいられる
- !のか。わからない…)pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);(…カリス、とても不安なのね。;アバロニクスめ
- !、余計なことを吹き込んでくれたわ)pc
- }
- &if(進行<46 and 不安==4){
- &if(魔法国へ==2){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);リアナは…。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);え?pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);リアナはなぜ魔法国なんかに向かったんだろう。pc
- &wait 150
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);…彼女もきっと、カリスと同じで自分を探してる
- !んじゃないのかしら。;p傷ついたことでそういう思いが膨くら
- !んだじゃ…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);そうなんだろうか。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);リアナって、とっても強い娘だと思うわ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、リアナは強くて、明るくて、優しくて…。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);ああもう、おのろけはやめてよ!pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);えっ!wああ…。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);フフ、好きなのね。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…。pc
- }&else{
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);リアナは…。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);え?pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);リアナはどうしてるんだろう。;もう島に着いてい
- !るんだろうか。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);そうね。;あれから大分経っているから。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);彼女は大丈夫だろうか。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);ルシェルが付いていてくれるでしょうから…。p
- &wait 50
- !o(1)j(2)ダリアj(0);今回の用が済んだら、会いに行きましょう。p;私は
- !眠っていた彼女しか判らないから、話してみたいわ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ。p
- !o(1)j(2)カリスj(0);(自分を取り戻して…)pc
- }
- }
- &if(進行==46 and 不安==4){
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);カリス、落ち着いたかい。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ん、ああ。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);そうか、ダリアのおかげかな。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);色々話しを聞いてもらったよ。;おかげでだいぶ迷
- !いが晴れたよ。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);心構えが出来たみたいね。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);さあ、リーナス港へ向かおう。p
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);(こっちも決心が着いた。;彼をこのまま見届けよ
- !う)pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);(カリスの運命と私たちの道は大きく繋がっている
- !。;そんな気がする)pc
- }
- &rts
- //━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
- [START]
- &bgm 0
- &partyset 0
- &map MAP\TITLE.MAP //マップの設定
- &mapsp MAP\TITLE.SP //BGの設定
- &mappal MAP\TITLE.PAL //BGパレットの設定
- %partypoint={0,36,8} //このブロックでの初期位置(X,Y)&向き(10KEY参照)
- &partyspeed 2
-
- &on
-
- &pcm 1
- &monsprint 64,80,T_00
- &wait 200
- &contrast 0
- &wait 200
- &monsprint 64,80,消し
- &contrast 15
-
- &label 最初
- &load
-
- &contrast 0
- &wait 80
- &partymove 8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8
-
- &ldef C=0
- &label
- C=C+1
- &contrast C
- &wait 5
- &if(C<15){&jmp @b}
-
- &pcm 2
- &freash $ffff
- &freash $ffff
- &wait 20
- &pcm 3
- &monsprint 0,32,T_01
-
- &wait 150
-
- &pcm 4
- &monsprint 0,128,T_02
-
- &wait 150
-
- &pcm 5
- &monsprint 0,216,T_03
-
- &wait 200
- &contrast 0
- &wait 100
- &monsprint 0,0,消し
- &monsprint 0,128,消し
- &monsprint 128,0,消し
- &monsprint 128,128,消し
- &move 0,36,2
- &contrast 15
- !o(1)j(2)★j(0);前回の粗筋と今回のプロローグの紹介が見ることが出来ます。;
- !好きな選択肢を選んで下さい。p
- !o(1)j(2)★j(0);1.前回の粗筋と今回のプロロー グの紹介を見る。p
- !o(1)j(2)★j(0);2.今回のプロローグの紹介だけ を見る。p
- !o(1)j(2)★j(0);3.両方とも見ない。p
- &if(最強==1){&jsr 99}
- &label
- %selectlist={1.前回の粗筋~,2.プロローグ~,3.スキップ}
- 選択1=%select
- &if(選択1==-1){
- !o(1)j(2)★j(0);ロード画面に戻ります。p
- !;よろしいですか?pc
- &if(%inkeyn==0){
- &jmp 最初
- }
- }
- &if(選択1==0){
- !o(1)j(2)★j(0);前回の粗筋と今回のプロローグの紹介を見ます。p
- !;よろしいですか?pc
- &if(%inkeyn==0){
- &goto SSF
- }
- }
- &if(選択1==1){
- !o(1)j(2)★j(0);前回の粗筋の紹介をスキップし、今回のプロローグの紹介のみ
- !見ます。p
- !;よろしいですか?pc
- &if(%inkeyn==0){
- &goto OP1
- }
- }
- &if(選択1==2){
- !o(1)j(2)★j(0);前回の粗筋と今回のプロローグの紹介をスキップします。p
- !;よろしいですか?pc
- &if(%inkeyn==0){
- &partyset 1,2
- &goto MATI1
- }
- }
- &jmp @b
-
- //━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
- [GAMEOVER]//ゲームオーバー
- &bgm 0
- &partyset 0
- &map MAP\NULL.MAP //マップの設定
- &mapsp MAP\TITLE.SP //BGの設定
- &mappal MAP\TITLE.PAL //BGパレットの設定
- &initscreen
- &patternpal GR\CG.PAL //モンスター用パレット
- %partypoint={0,0,2} //このブロックでの初期位置(X,Y)&向き(10KEY参照)
- &on
- &bgm 29
- &monsprint 64,88,やられ
- &wait 500
- &contrast 0
- &wait 200
- &monsprint 64,88,消し
- &contrast 15
- &reset
-
- //━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
- [SSF]//ACT.1粗筋
- &bgm 7
- &map MAP\TITLE.MAP //マップの設定
- &mapsp MAP\TITLE.SP //BGの設定
- &mappal MAP\TITLE.PAL //BGパレットの設定
- %partypoint={0,48,-2} //このブロックでの初期位置(X,Y)&向き(10KEY参照)
-
- &on
- &wait 100
- &monsprint 0,16,SSF_1
- !o(1);そこは海賊船、というよりも軍艦めいている船の上であった。;その船上を
- !一人の少年が追われ海へと飛び込んだ。pc
- &wait 100
- &monsprint 0,16,SSF_2
- !o(1);やがて少年はどこかの島に流れ着いていた。;さらに運よく、近くの町の者
- !に救われ一命を取り留めた。p;だが、少年は記憶を失くしていて、自分
- !の名がカリスということ以外は覚えてはいなかった。pc
- &wait 100
- &monsprint 0,16,SSF_3
- !o(1);すっかり体力が回復したカリスは、次第に町の人々に打ち解けていく。pし
- !かし島はたいへんな事件に巻き込まれていた。p;伝染病のせいで隣の町
- !は壊滅し、カリスがいる町の人々も感染していった。p;感染を避けられ
- !たカリスは町の少女リアナ、隣町の生存者であるレイニと共にシャーマ
- !ンの村へ助けを求めに行くのであった。pc
- &wait 100
- &monsprint 0,16,SSF_4
- !o(1);シャーマンの治療で町は救われたが、レイニがシャーマンの村人を殺害し
- !、聖剣の洞窟へ向かったことがわかった。p;洞窟には絶対の力を持つと
- !いう聖剣の一つが納められており、シャーマンたちは長い間、洞窟と聖
- !剣を護っていたのであった。p;村人たちは古き戒めにより洞窟に入るこ
- !とも、レイニの行動から町から助けを呼ぶことも出来ない。p;そこで、
- !カリスとリアナがレイニを追い洞窟へ向かうこととなった。p;その際、
- !シャーマンによりリアナは魔法の力に目覚めるのであった。pc
- &wait 100
- &monsprint 0,16,SSF_5
- !o(1);洞窟の最下層に辿り着くと、そこにはレイニの姿は無く、魔竜が聖剣を護
- !っていた。p;カリスとリアナはその魔竜と戦う破目になり、どうにか魔
- !竜を倒したが…。p;戦いで疲れた2人の前にジャステと名乗る女が現れ
- !、聖剣を奪って行ってしまう。p;彼女の話しから、ジャステとレイニは
- !同一人物で、町の伝染病も聖剣を得るための企みだったことを知る。p
- !;2人はジャステを追うために一旦、シャーマンの村へと戻った。pc
- &wait 100
- &monsprint 0,16,SSF_6
- !o(1);カリスとリアナはシャーマンの助言を得て、ジャステを倒し、聖剣を取り
- !戻すために今回の事件の発端である島主の塔へと向かう。p;塔を昇り詰
- !め、ジャステとその主であるベスタを倒し無事に聖剣を取り戻した。p;
- !しかし、カリスには強く引っ掛かるものが残った。p;ベスタが自分につ
- !いて何か知っている様子だったことと、死に際に言い残したリザレアと
- !いう国の名らしき言葉…。pc
- &wait 100
- !o(1);カリスとリアナの活躍で島は平静を取り戻した。p;本国のダリムラクスか
- !らの救援によって、今回の事件は謎を残したままではあったが終息して
- !いった。pc
- &wait 100
- !o(1);そしてまた時が移る…。pc
-
- &bgm -1
- &wait 300
- &goto OP1
-
-
- //━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
- [OP1]//ACT.2プロローグ
- //その1
- &bgm 8
- &partyset 0
- &sppsp CHR\OPEN.SPP //SPP(人/スプライト)ファイルを設定
- &map MAP\OP01.MAP //マップの設定
- &mapsp MAP\OP01.SP //BGの設定
- &mappal MAP\OP01.PAL //BGパレットの設定
- %partypoint={0,15,-2} //このブロックでの初期位置(X,Y)&向き(10KEY参照)
- &partyspeed 1
-
- // PAL,BANK, SP,向き,動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1) ={$A, 1,$00, 2, -1} //町長
- %mandef(2) ={$A, 1,$01, 2, -1} //町長夫人
- %mandef(3) ={$A, 1,$02, 2, -1} //リアナパパ
- %mandef(4) ={$A, 1,$04, 2, -1} //リアナママ
- %mandef(5) ={$9, 1,$06, 2, -1} //老人
- %mandef(6) ={$B, 1,$07, 2, -1} //中年女
- %mandef(7) ={$B, 1,$08, 2, -1} //子供男
- %mandef(8) ={$f, 1,$09, 2, -1} //若者男
- %mandef(9) ={$9, 1,$0A, 2, -1} //船乗り
- %mandef(10)={$9, 1,$20, 2, 0} //カリス
-
- &on
- &monsprint 0,80,OP_M04
- &wait 200
- &monsprint 0,80,消し
- &monsprint 128,80,消し
-
- &wait 100
-
- &partymove 2,2,2,2,2,2,2,2,2,2,2,2,2
- &wait 20
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);じゃあ、みんな。pc
- !o(1)j(2)町長j(0);ああ、達者でな。pc
- !o(1)j(2)リアナパパj(0);気を付けてな。pc
- %mandef(4) ={$A, 1,$05, 2, -1} //リアナママ
- &on
- !o(1)j(2)リアナママj(0);ああ、リアナったらどこに行ってるのかしら。pc
- %mandef(3) ={$A, 1,$03, 2, -1} //リアナパパ
- &on
- !o(1)j(2)リアナパパj(0);まあ、しようがないだろpc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);リアナには…、よろしく言っておいて下さい。p
- !o(1)j(2)カリスj(0);(あれっきり、一言も話してないな。;このままさよな
- !らか…)pc
- %mandef(3) ={$A, 1,$02, 2, -1} //リアナパパ
- %mandef(4) ={$A, 1,$04, 2, -1} //リアナママ
- &on
- !o(1)j(2)町長j(0);近くまで来ることがあったら、必ずよってくれよ。;みんな喜
- !ぶ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、本当に皆ありがとう。pc
- %mandef(9) ={$9, 1,$0B, 2, -1} //船乗り
- &on
- !o(1)j(2)船乗りj(0);それじゃあ、そろそろでるよ。pc
- %mandef(9) ={$9, 1,$0A, 2, -1} //船乗り
- &on
- &manmove 10,-8,8,8
- !o(1)j(2)リアナママj(0);もうしばらくここに。pc
- &manmove 10,-2
- %mandef(3) ={$A, 1,$03, 2, -1} //リアナパパ
- &on
- !o(1)j(2)リアナパパj(0);カリスが自分で決めた事だ、気持ちよく旅立たせてや
- !ろう。pc
- !o(1)j(2)リアナママj(0);でも…。pc
- %mandef(3) ={$A, 1,$02, 2, -1} //リアナパパ
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…ありがとう。p
- &manmove 10,-8
- !o(1)j(2)カリスj(0);(皆のことは忘れない…)pc
- &contrast 0
- &manmove 10,8,8,8,8
- &wait 300
- &goto OP2
-
- //━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
- [OP2]
- &map MAP\OP02.MAP //マップの設定
- &mapsp MAP\OP02.SP //BGの設定
- &mappal MAP\OP02.PAL //BGパレットの設定
- %partypoint={0,0,-2} //このブロックでの初期位置(X,Y)&向き(10KEY参照)
-
- // PAL,BANK, SP,向き,動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1) ={$9, 0,$60, 2, -1} //カリス
- %mandef(2) ={$A, 1,$0C, 2, -1} //町長
- %mandef(3) ={$A, 1,$0D, 2, -1} //リアナパパ
- %mandef(4) ={$A, 1,$0E, 2, -1} //リアナママ
- %mandef(5) ={$9, 1,$0F, 2, -1} //老人
- %mandef(6) ={$A, 1,$01, 2, -1} //町長夫人
-
- &on
- &monsprint 88,80,OP_M01
- &wait 200
- &monsprint 88,80,消し
-
- &wait 100
-
- !o(1)j(2)町長j(0);カリス、話しというのは何だね。pc
- &monsprint 160,32,カリス
- !o(1)j(2)カリスj(0);はい。;実はオレ、この島を出ようと思うんです。pc
- !o(1)j(2)リアナママj(0);何ですって!pc
- %mandef(3) ={$A, 0,$A0, 2, -1} //リアナパパ
- &on
- !o(1)j(2)リアナパパj(0);落ち着いて。ww;
- %mandef(3) ={$A, 1,$0D, 2, -1} //リアナパパ
- &on
- !カリス、話しを続けてくれ。pc
- &monsprint 160,32,カリス
- !o(1)j(2)カリスj(0);この間の事件の時…。pc
- !o(1)j(2)町長j(0);塔が乗っ取られた時か。pc
- &monsprint 160,32,カリス
- !o(1)j(2)カリスj(0);あの時、オレとリアナが塔の最上階で敵のリーダーと対決
- !したんです。p;ヤツはオレを見てオレの事を知っているようなことを言っ
- !た。pc
- !o(1)j(2)一同j(0);…。pc
- &monsprint 160,32,カリス
- !o(1)j(2)カリスj(0);ヤツはオレをどこかで見たという感じだった。pc
- !o(1)j(2)リアナママj(0);たったそれだけで、この島を出てどこに行こうと言う
- !の。pc
- !o(1)j(2)町長夫人j(0);もうしばらくここにいれば。;きっとよくなるわ。pc
- &monsprint 160,32,カリス
- !o(1)j(2)カリスj(0);(この安らぎの中なら、すべてを思い出せなくても…)p
- !o(1)j(2)カリスj(0);そうかも知れないけど、なぜかじっとしていられない。pc
- !o(1)j(2)町長j(0);しかし、この島を襲ったあやつらの素性がわからんだろう。
- !;ダリムラクスから来た兵の者が見た事の無い紋章だと言っておった。p
- !どこの国の人間かもわからん。pc
- &monsprint 160,32,カリス
- !o(1)j(2)カリスj(0);…リザレア、たぶんこれが国の名前。pc
- !o(1)j(2)リアナパパj(0);リザレア?;聞いたことがないな。ww;う~ん、だが世
- !界は広い、そういう名の国もあるかも知れないが。pc
- !o(1)j(2)町長j(0);その国を探すのか。pc
-
- &monsprint 160,32,カリス
- !o(1)j(2)カリスj(0);ああ、なぜか聞き覚えがあるんです。;懐かしいような…。pc
- &wait 200
- !o(1)j(2)町長j(0);決心は固いようだな。p;わかった。;この時期だ、すぐに旅立て
- !るか判からんが、私が交渉して船に乗せてもらえるようにしてやろう。pc
- &monsprint 160,32,カリス
- !o(1)j(2)カリスj(0);ありがとう、町長。pc
- !o(1)j(2)リアナパパj(0);…行ってしまうか。;お前のことだ、一人でも心配する
- !ことはないだろうが、無茶はするな。pc
- !o(1)j(2)リアナママj(0);…リアナとは話したの?pc
- &monsprint 160,32,カリス
- !o(1)j(2)カリスj(0);いや…、まだ…。pc
- !o(1)j(2)リアナママj(0);今ごろだと海岸にいると思うから行ってあげて…。pc
- &monsprint 160,32,カリス
- !o(1)j(2)カリスj(0);ああ…。pc
- !o(1)j(2)リアナパパj(0);よし、出発の日どりが決まったら盛大に送別会を開こ
- !う。pc
-
- &wait 100
- &goto OP3
-
- //━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
- [OP3]
- &map MAP\OP03.MAP //マップの設定
- &mapsp MAP\OP03.SP //BGの設定
- &mappal MAP\OP03.PAL //BGパレットの設定
- %partypoint={0,24,-2} //このブロックでの初期位置(X,Y)&向き(10KEY参照)
-
- // PAL,BANK, SP,向き,動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1) ={$A, 0,$A1, 2, 0} //リアナ
- %mandef(2) ={$9, 0,$60, 8, 0} //カリス
-
-
- &on
- &manmove 2,8,8,8,8,8,8,8,8,8,8
-
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);…wよお、リアナ。pc
- %mandef(1) ={$A, 0,$A5, 2, -1} //リアナ
- &on
- &wait 20
- %mandef(1) ={$A, 0,$A6, 2, -1} //リアナ
- &on
- &wait 20
- %mandef(1) ={$A, 0,$A7, 2, -1} //リアナ
- &on
- &wait 20
- %mandef(1) ={$A, 0,$A8, 2, -1} //リアナ
- &on
- &wait 20
-
- &monsprint 24,32,リアナ
- !o(1)j(2)リアナj(0);カリス…。pc
- &manmove 2,8,8,8,8,8,8,8,8
- %manpoint(2)={100,100}
- %mandef(1) ={$A, 0,$A9, 2, -1} //リアナ
- %mandef(3) ={$9, 1,$24, 2, -1} //カリス
- %manpoint(3)={14,19}
- &on
- %mandef(3) ={$9, 1,$25, 2, -1} //カリス
- &on
- &wait 20
- %mandef(3) ={$9, 1,$26, 2, -1} //カリス
- &on
- &wait 20
- %mandef(3) ={$9, 1,$27, 2, 0} //カリス
- &on
- &wait 20
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);今日は船は来ないみたいだな。pc
- %mandef(1) ={$A, 0,$A6, 2, -1} //リアナ
- &on
- &wait 20
- %mandef(1) ={$A, 0,$A5, 2, -1} //リアナ
- &on
- &wait 20
- &monsprint 24,32,リアナ
- !o(1)j(2)リアナj(0);ここ最近ひんぱんに来てたけど、落ち着いたみたい。pc
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);(言い出しにくいなぁ)pc
- %mandef(1) ={$A, 0,$A1, 2, 0} //リアナ
- &on
- //単なるウェイト。マンイベントがアニメするために
- &partymove 4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4
- &monsprint 24,32,リアナ
- !o(1)j(2)リアナj(0);カリスがこの島に来て3ヶ月ぐらい経ったね。pc
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);ん、ああ。;もう、そんな経ったんだ。p
- !o(1)j(2)カリスj(0);(3ヶ月か…)pc
- &monsprint 24,32,リアナ
- !o(1)j(2)リアナj(0);あたしね、あの事件の時。;町の皆やロンドの人たちがひど
- !い目にあわされて、すごく怒ってた。p;それで、敵だったけどたくさん
- !の人の命を…。p;この人たちにも家族がいるんだろうなって。;あの時は
- !そういうこと、全然考えなかったんだけど…。p
- !o(1)j(2)リアナj(0);(違う、考えなかったわけじゃない。;そんなのどうでもい
- !いと思ってたんだ)p
- !o(1)j(2)リアナj(0);…こうして元に戻ってみると、すごく苦しくて怖い。;人間
- !を焼き殺しちゃうような力があたしの中にあるなんて…。pc
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);…そんな思い詰めることないさ、戦わなきゃこっちが殺さ
- !れる。p;それにあそこでリアナがいなかったら、今の町の状態は無かっ
- !たよ。;オレ一人だけじゃ無理だった。p
- !o(1)j(2)カリスj(0);(オレは人を斬るのに何のちゅうちょもなかった。;
- !まるで些細なことにしか感じちゃいない…)pc
- &monsprint 24,32,リアナ
- !o(1)j(2)リアナj(0);ありがとう。;…カリスって強いね。pc
- //単なるウェイト。マンイベントがアニメするために
- &partymove 4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);実はオレ、この島を出ていくつもりなんだ。pc
- &monsprint 24,32,リアナ
- %mandef(1) ={$A, 0,$A9, 2, -1} //リアナ
- &on
- !o(1)j(2)リアナj(0);えっ!p
- !o(1)j(2)リアナj(0);…何か思い出したの。pc
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);いいや、何も思いだせちゃいない。pc
- &wait 50
- &monsprint 24,32,リアナ
- !o(1)j(2)リアナj(0);…アイツの最後に言ってた…。pc
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);ああ、頭に妙に引っかかって、リザレアって言葉に聞き覚
- !えがあるんだ。pc
- %mandef(1) ={$A, 0,$A6, 2, -1} //リアナ
- &on
- &wait 20
- %mandef(1) ={$A, 0,$A5, 2, -1} //リアナ
- &on
- &wait 20
- %mandef(1) ={$A, 0,$A1, 2, 0} //リアナ
- &on
- &wait 20
- &monsprint 24,32,リアナ
- !o(1)j(2)リアナj(0);…いつ行くの。pc
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);まだわからないけど、近いうちに船に乗せてもらうつもり
- !だ。pc
- &partymove 4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4
- %mandef(1) ={$A, 0,$AA, 2, -1} //リアナ
- &wait 20
- &on
- %mandef(1) ={$A, 0,$AB, 2, -1} //リアナ
- &on
- &wait 20
- %mandef(1) ={$A, 0,$AC, 2, -1} //リアナ
- &on
- &wait 20
- &monsprint 24,32,リアナ
- !o(1)j(2)リアナj(0);…さよならっ!;勝手にどこへでもいっちゃえっ!pc
- %mandef(1) ={$A, 0,$AD, 2, -1} //リアナ
- &on
- &wait 20
- %mandef(1) ={$A, 0,$AE, 2, -1} //リアナ
- &on
- &wait 20
- %mandef(1) ={$A, 0,$AF, 2, -1} //リアナ
- &on
- &wait 20
- %mandef(1) ={$A, 0,$C0, 2, 1} //リアナ
- &on
- &manmove 1,2,2
- %mandef(3) ={$9, 0,$E5, 2, -1} //カリス
- &on
- %mandef(3) ={$9, 0,$E6, 2, -1} //カリス
- &on
- &wait 15
- %mandef(3) ={$9, 0,$E0, 2, 0} //カリス
- &on
- &wait 15
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);リアナっ!pc
- &manmove 1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
- %manpoint(1)={100,100}
- &on
- &partymove 8,8,8,8,8,8,8,8,8,8,8,8
- &contrast 0
- &bgm -1
- &partymove 6,6,6,6,6,6,6,6,6,6,6,6
- &goto OP4
-
- //━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
- [OP4]
- &bgm 9
- &map MAP\OP04.MAP //マップの設定
- &mapsp MAP\OP04.SP //BGの設定
- &mappal MAP\OP04.PAL //BGパレットの設定
- %partypoint={0,15,-2} //このブロックでの初期位置(X,Y)&向き(10KEY参照)
-
- // PAL,BANK, SP,向き,動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1) ={$2, 1,$E0, 2, -1} //階段
- %mandef(2) ={$2, 1,$E1, 2, -1} //階段
- %mandef(3) ={$2, 1,$E2, 2, -1} //階段
- %mandef(4) ={$2, 1,$E0, 2, -1} //階段
- %mandef(5) ={$2, 1,$E1, 2, -1} //階段
- %mandef(6) ={$2, 1,$E2, 2, -1} //階段
- %mandef(7) ={$9, 1,$24, 2, -1} //カリス
- %mandef(8) ={$A, 0,$80, 8, 0} //リアナ
- %mandef(9) ={$2, 0,$00, 2, -1} //扉
- %mandef(10)={$2, 0,$00, 2, -1} //扉
-
- &on
- &wait 100
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);(船員にいくらか話を聞いたがリザレアの手がかりは無し
- !、世界中を巡る船乗りでも知らないと言うのか…)pc
- &wait 100
- %mandef(9) ={$2, 1,$E6, 2, -1} //扉
- %mandef(10)={$2, 1,$EA, 2, -1} //扉
- &on
- &wait 20
- %mandef(9) ={$2, 1,$E5, 2, -1} //扉
- %mandef(10)={$2, 1,$E9, 2, -1} //扉
- &on
- &wait 20
- %mandef(9) ={$2, 1,$E4, 2, -1} //扉
- %mandef(10)={$2, 1,$E8, 2, -1} //扉
- &on
- &wait 20
- %mandef(9) ={$2, 1,$E3, 2, -1} //扉
- %mandef(10)={$2, 1,$E7, 2, -1} //扉
- &on
- &wait 20
- &manmove 8,4,4,4,4,-4
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);(…リアナとはあのままで良かったんだろうか)pc
- &manmove 8,4,4,4,4,8,-8,8,-8,8,-8
- %mandef(11)={$A, 0,$C4, 2, -1} //リアナ
- %manpoint(11)={14,11}
- %manpoint(8)={100,100}
- &on
- &manmove 11,8
- &monsprint 24,32,リアナ
- !o(1)j(2)リアナj(0);わぁっ!pc
- %mandef(7) ={$9, 0,$E7, 2, -1} //カリス
- %mandef(11)={$A, 0,$8C, 2, -1} //リアナ
- &on
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);ど、どわぁ~!pc
- &wait 15
- %mandef(7) ={$9, 0,$E8, 2, -1} //カリス
- &on
- &wait 15
- %mandef(7) ={$9, 0,$E9, 2, -1} //カリス
- &on
-
- &manmove 11,2
- &monsprint 24,32,リアナ
- !o(1)j(2)リアナj(0);へへえ、ごめんごめん。;びっくりした。pc
- %mandef(7) ={$9, 0,$EA, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);な、wなんでここにいるんだっ!pc
- &monsprint 24,32,リアナ
- !o(1)j(2)リアナj(0);付いてきちゃった。pc
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);きちゃったって…。;どうして?;両親には?pc
- &monsprint 24,32,リアナ
- !o(1)j(2)リアナj(0);パパとママにはちゃんと置き手紙してきたから平気。pc
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);へ、w平気かよっ!pc
- &monsprint 24,32,リアナ
- !o(1)j(2)リアナj(0);だいじょうぶ、うちの親ってけっこう寛大なんだから、知
- !ってるでしょ。pc
- %mandef(7) ={$9, 0,$E4, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);…いや、w絶対大騒ぎしてるぞ。pc
- &monsprint 24,32,リアナ
- !o(1)j(2)リアナj(0);だって、あのまま島にいるなんてできないよ。;あたしの中
- !にある力、このままじゃ収まらないよ。p;それにカリス一人じゃ心配だ
- !しね。;あの時だってあたしがいなきゃ、たいへんだったんでしょ?pc
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);(…リアナも彼女なりに何かを求めているのか)p
- %mandef(7) ={$9, 0,$EA, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);だけど…。pc
- &monsprint 24,32,リアナ
- !o(1)j(2)リアナj(0);文句言ったって、もう海の上なんだからね。;あたしにここ
- !から泳いで帰れって言うの?pc
- %mandef(7) ={$9, 0,$E4, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);宛の無い旅なんだ。ww;オレに付いてきたらいつ島に帰れる
- !かわかんないんだぜ。pc
- &monsprint 24,32,リアナ
- !o(1)j(2)リアナj(0);わかってる。;あたしなりによく考えた結果だもん。;後悔
- !しない。pc
- &wait 100
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);…ふぅ。ww;ったく、わかったよ。pc
- &monsprint 24,32,リアナ
- !o(1)j(2)リアナj(0);ほんと!ww;うんうん、可愛い子には旅をさせろってね!pc
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);(なんか違うような…)p
- !o(1)j(2)カリスj(0);しかし、どうやって船に乗りこんだんだ。pc
- &monsprint 24,32,リアナ
- !o(1)j(2)リアナj(0);それはねぇ…。pc
- !o(1)j(2)船室よりj(0);こらっ、ねーちゃんっ!;仕事さぼってどこいってんだっ
- !!pc
- %mandef(11)={$A, 0,$C5, 2, -1} //リアナ
- &on
- &monsprint 24,32,リアナ
- !o(1)j(2)リアナj(0);あっ、ヤバッ。pc
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);…この船で雇ってもらったのか。pc
- %manpoint(8) ={14,11}
- %manpoint(11)={100,100}
- &on
- &monsprint 24,32,リアナ
- !o(1)j(2)リアナj(0);そういうこと、じゃまたね。pc
- &manmove 8,2,2,2,6,6,6,6,6,6,6,6
- %mandef(9) ={$2, 1,$E4, 2, -1} //扉
- %mandef(10)={$2, 1,$E8, 2, -1} //扉
- &on
- &wait 20
- %mandef(9) ={$2, 1,$E5, 2, -1} //扉
- %mandef(10)={$2, 1,$E9, 2, -1} //扉
- &on
- &wait 20
- %mandef(9) ={$2, 1,$E6, 2, -1} //扉
- %mandef(10)={$2, 1,$EA, 2, -1} //扉
- &on
- &wait 20
- %mandef(9) ={$2, 0,$00, 2, -1} //扉
- %mandef(10)={$2, 0,$00, 2, -1} //扉
- &on
- &wait 100
-
- !o(1)j(2)リアナj(0);ごめんなさーい!;甲板でしつこい人に口説かれちゃって…。
- !pc
- %mandef(7) ={$9, 0,$EB, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);(おい。ww;まったく、先が思いやられるぜ…)pc
- &contrast 0
- &bgm -1
- &wait 300
- &goto OP5
-
- //━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
- [OP5]
- &bgm 10
- &map MAP\OP05.MAP //マップの設定
- &mapsp MAP\OP05.SP //BGの設定
- &mappal MAP\OP05.PAL //BGパレットの設定
- %partypoint={0,32,-8} //このブロックでの初期位置(X,Y)&向き(10KEY参照)
-
- // PAL,BANK, SP,向き,動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1) ={$9, 1,$40, 8, 0} //少年カリス
- %mandef(2) ={$C, 1,$60, 2, -1} //騎士
- %mandef(3) ={$C, 1,$60, 2, -1} //騎士
- %mandef(4) ={$C, 1,$60, 2, -1} //騎士
- %mandef(5) ={$C, 1,$60, 2, -1} //騎士
- %mandef(6) ={$C, 1,$60, 2, -1} //騎士
- %mandef(7) ={$C, 1,$65, 2, -1} //名騎士
- %mandef(8) ={$C, 1,$66, 2, -1} //名騎士
-
- &on
- &monsprint 0,80,OP_M02
- &wait 200
- &monsprint 0,80,消し
- &monsprint 128,80,消し
-
- &wait 100
-
- !o(1)j(2)少年j(0);見つけた、この先だ。pc
-
- &manmove 1,8,8,8,8,8,8,8
- %mandef(1) ={$9, 1,$40, 8, -1} //少年カリス
- &on
-
- %mandef(3) ={$C, 1,$60, 2, 0} //騎士
- &on
- &manmove 3,2,2,2
- %mandef(3) ={$C, 1,$60, 2, -1} //騎士
- &on
- !o(1)j(2)騎士j(0);貴様っ!;よくもっ!pc
- %mandef(4) ={$C, 1,$60, 2, 0} //騎士
- &on
- &manmove 4,2,2,2
- %mandef(4) ={$C, 1,$60, 2, -1} //騎士
- &on
- !o(1)j(2)騎士j(0);悪魔めっ!;ここから先へは行かせんぞっ!pc
-
- %mandef(1) ={$9, 1,$40, 8, 0} //少年カリス
- &on
- &manmove 1,8,8,8
- !o(1)j(2)少年j(0);…邪魔だ、どけ。pc
-
- &pcm 24
- &monsprint 64,32,OP_S01A
- &wait 10
- &monsprint 64,32,OP_S01B
- &wait 10
- &monsprint 64,32,OP_S01C
- &wait 10
- &monsprint 64,32,OP_S01D
- &wait 10
- &monsprint 64,32,消し
- %mandef(2) ={$C, 1,$64, 2, -1} //騎士
- %mandef(3) ={$C, 1,$64, 2, -1} //騎士
- %mandef(4) ={$C, 1,$64, 2, -1} //騎士
- %mandef(5) ={$C, 1,$64, 2, -1} //騎士
- %mandef(6) ={$C, 1,$64, 2, -1} //騎士
- &on
- !o(1)j(2)騎士j(0);ぐおぉーっ!wwwc
-
- %manpoint(2)={100,100}
- %manpoint(3)={100,100}
- %manpoint(4)={100,100}
- %manpoint(5)={100,100}
- %manpoint(6)={100,100}
- &on
-
- &manmove 1,8,8,8,8,8,8,8,8,8,8,8,8,8,8
- %mandef(1) ={$9, 1,$40, 8, -1} //少年カリス
- &on
- !o(1)j(2)少年j(0);この中だなpc
- &partymove 8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8
-
- %mandef(7) ={$C, 1,$67, 2, -1} //名騎士
- %mandef(8) ={$C, 1,$68, 2, -1} //名騎士
- &on
- !o(1)j(2)騎士j(0);おぬし、一体…。pc
- !o(1)j(2)少年j(0);そう、オレはお前らの死神だ。pc
-
- %mandef(1) ={$9, 1,$40, 8, 0} //少年カリス
- &on
- &manmove 1,8,8,8,8
- %mandef(1) ={$9, 1,$40, 8, -1} //少年カリス
- &on
- %mandef(1) ={$9, 1,$6B-12, 2, -1} //少年カリス
- &wait 10
- &on
- %mandef(1) ={$9, 1,$6C-12, 2, -1} //少年カリス
- &wait 10
- &on
- &monsprint 120,48,OP_S02A
- %mandef(1) ={$9, 1,$6D-12, 2, -1} //少年カリス
- &wait 10
- &on
- &pcm 26
- &monsprint 120,48,OP_S02B
- &wait 10
- &monsprint 120,48,OP_S02C
- &wait 10
-
- %mandef(7) ={$C, 1,$69, 2, -1} //名騎士
- %mandef(8) ={$C, 1,$6A, 2, -1} //名騎士
- &on
-
- &monsprint 120,48,OP_S02D
- &wait 10
- &monsprint 120,48,消し
-
- !o(1)j(2)騎士j(0);んあぁぁーっ!wwwc
- %manpoint(7) ={100,100}
- %manpoint(8) ={100,100}
- %mandef(1) ={$9, 1,$40, 8, -1} //少年カリス
- &on
- !o(1)j(2)少年j(0);フッ…。;鉄で武装したところで人間とはなんと脆い。pc
- &contrast 0
- &wait 100
- &goto OP6
-
- //━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
- [OP6]
- &map MAP\OP06.MAP //マップの設定
- &mapsp MAP\OP06.SP //BGの設定
- &mappal MAP\OP06.PAL //BGパレットの設定
- %partypoint={0,15,-2} //このブロックでの初期位置(X,Y)&向き(10KEY参照)
-
- // PAL,BANK, SP,向き,動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1) ={$2, 1,$EB, 0, -1} //水晶
- %mandef(2) ={$2, 1,$EB, 0, -1} //水晶
- %mandef(3) ={$2, 1,$EB, 0, -1} //水晶
- %mandef(4) ={$2, 1,$EB, 0, -1} //水晶
- %mandef(5) ={$2, 1,$EB, 0, -1} //水晶
- %mandef(6) ={$2, 1,$EB, 0, -1} //水晶
- %mandef(7) ={$2, 1,$EB, 0, -1} //水晶
- %mandef(8) ={$9, 1,$40, 8, -1} //少年カリス
- %mandef(9) ={$A, 1,$82, 2, -1} //神子
- %mandef(10)={$A, 1,$80, 2, -1} //神官
- %mandef(11)={$A, 1,$80, 2, -1} //神官
- %mandef(12)={$A, 1,$80, 2, -1} //神官
- %mandef(13)={$A, 1,$80, 2, -1} //神官
-
- &on
- &wait 100
- !o(1)j(2)少年j(0);さあ、かくれんぼは終わりだ。;鬼が来たぞ、お姫様。pc
- %mandef(9) ={$A, 1,$83, 2, -1} //少女リアナ
- &on
- !o(1)j(2)少女j(0);亡霊よその少年から離れ、己があるべき闇の世界へと去れっ
- !!pc
- !o(1)j(2)少年j(0);黙れっ!;そのような言霊、オレには利かんぞ!pc
-
- %mandef(9) ={$A, 1,$84, 2, -1} //少女リアナ
- &on
-
- &pcm 24
- &monsprint 64,32,OP_S01A
- &wait 10
- &monsprint 64,32,OP_S01B
- &wait 10
- &monsprint 64,32,OP_S01C
- &wait 10
- &monsprint 64,32,OP_S01D
- &wait 10
- &monsprint 64,32,消し
-
- %mandef(10)={$A, 1,$81, 2, -1} //神官
- %mandef(11)={$A, 1,$81, 2, -1} //神官
- %mandef(12)={$A, 1,$81, 2, -1} //神官
- %mandef(13)={$A, 1,$81, 2, -1} //神官
- &on
- !o(1)j(2)神官j(0);ギャーッ!wwc
-
- %mandef(1) ={$2, 1,$EC, 0, -1} //水晶
- %mandef(2) ={$2, 1,$EC, 0, -1} //水晶
- %mandef(3) ={$2, 1,$EC, 0, -1} //水晶
- %mandef(4) ={$2, 1,$EC, 0, -1} //水晶
- %mandef(5) ={$2, 1,$EC, 0, -1} //水晶
- %mandef(6) ={$2, 1,$EC, 0, -1} //水晶
- %mandef(7) ={$2, 1,$EC, 0, -1} //水晶
- &on
- &wait 15
- %mandef(1) ={$2, 1,$ED, 0, -1} //水晶
- %mandef(2) ={$2, 1,$ED, 0, -1} //水晶
- %mandef(3) ={$2, 1,$ED, 0, -1} //水晶
- %mandef(4) ={$2, 1,$ED, 0, -1} //水晶
- %mandef(5) ={$2, 1,$ED, 0, -1} //水晶
- %mandef(6) ={$2, 1,$ED, 0, -1} //水晶
- %mandef(7) ={$2, 1,$ED, 0, -1} //水晶
- &on
- &wait 15
- %mandef(1) ={$2, 1,$EE, 0, -1} //水晶
- %mandef(2) ={$2, 1,$EE, 0, -1} //水晶
- %mandef(3) ={$2, 1,$EE, 0, -1} //水晶
- %mandef(4) ={$2, 1,$EE, 0, -1} //水晶
- %mandef(5) ={$2, 1,$EE, 0, -1} //水晶
- %mandef(6) ={$2, 1,$EE, 0, -1} //水晶
- %mandef(7) ={$2, 1,$EE, 0, -1} //水晶
- %manpoint(10)={100,100}
- %manpoint(11)={100,100}
- %manpoint(12)={100,100}
- %manpoint(13)={100,100}
- &on
- &wait 150
- %mandef(9) ={$A, 1,$85, 2, -1} //少女リアナ
- &on
- &wait 30
- %mandef(9) ={$A, 1,$86, 2, -1} //少女リアナ
- &on
- &wait 30
- %mandef(9) ={$A, 1,$87, 2, -1} //少女リアナ
- &on
- &wait 60
- %mandef(9) ={$A, 1,$88, 2, -1} //少女リアナ
- &on
- &wait 50
- !o(1)j(2)少女j(0);くっ、しかし私を殺したところでお前の望みなど叶わぬ。pc
-
- %mandef(8) ={$9, 1,$40, 8, 0} //少年カリス
- &on
- &manmove 8,8,8,8,8,8,8
-
- !o(1)j(2)少年j(0);黙れ黙れっ!;おまえで2人目、あと3人、3人で望みが叶う
- !。;我が再生の時…。pc
- !o(1)j(2)少女j(0);馬鹿め、その時こそお前の最後だというのに…。pc
- &manmove 8,8,8,8,8,8,8
- !o(1)j(2)少年j(0);う、うるさいっ!;死ねぇ~っ!pc
-
- %mandef(14)={$9, 1,$6E, 2,-1} //少年カリス
- %mandef(15)={$9, 1,$6F, 2,-1} //少年カリス
- %manpoint(8)={100,100}
- %manpoint(14)={14,18}
- %manpoint(15)={16,18}
- &on
- &wait 20
- %mandef(14)={$9, 1,$8C, 2,-1} //少年カリス
- %mandef(15)={$9, 1,$8D, 2,-1} //少年カリス
- &on
- &wait 20
- %mandef(14)={$9, 1,$8E, 2,-1} //少年カリス
- %mandef(15)={$9, 1,$8F, 2,-1} //少年カリス
- &on
- &pcm 22
- &monsprint 104,88,OP_S03A
- &wait 10
- &monsprint 104,88,OP_S03B
- &wait 10
- %mandef(14)={$9, 1,$A0, 2,-1} //少年カリス
- %mandef(15)={$9, 1,$A1, 2,-1} //少年カリス
- %mandef(9) ={$A, 1,$89, 2, -1} //少女リアナ
- &on
- &monsprint 104,88,OP_S03C
- &wait 10
- &monsprint 104,88,OP_S03D
- &wait 10
- &monsprint 104,88,消し
- %mandef(9) ={$A, 1,$8A, 2, -1} //少女リアナ
- &on
- &wait 20
- %mandef(9) ={$A, 1,$8B, 2, -1} //少女リアナ
- &on
- &wait 20
- %manpoint(9)={100,100}
- &on
- &wait 100
- %mandef(14)={$9, 1,$A2, 2,-1} //少年カリス
- %mandef(15)={$9, 1,$A3, 2,-1} //少年カリス
- &on
- &wait 20
- %mandef(14)={$9, 1,$A4, 2,-1} //少年カリス
- %mandef(15)={$9, 1,$A5, 2,-1} //少年カリス
- &on
- &wait 20
- %manpoint(14)={100,100}
- %manpoint(15)={100,100}
- %manpoint(8)={15,18}
- &on
- &wait 150
- &manmove 8,8,8
- &wait 20
- &manmove 8,-6,-2
-
- !o(1)j(2)???j(0);カリス、呪われし王子カリスよ。;お前の名は永久に裏切り
- !者の名として呼ばれるだろう。p;その罪を購うためお前は殺し続けるのだ
- !。p;カリス、我が息子よ。pc
- &freash $E86
- %manpoint(8)={100,100}
- &on
- &wait 100
- !o(1)j(2)カリスj(0);(オレじゃない…。;オレがやったんじゃないっ!)pc
- &bgm -1
- &contrast 0
- &wait 300
- &goto OP7
-
- //━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
- [OP7]
- &bgm 11
- &map MAP\OP07.MAP //マップの設定
- &mapsp MAP\OP07.SP //BGの設定
- &mappal MAP\OP07.PAL //BGパレットの設定
- %partypoint={0,15,-2} //このブロックでの初期位置(X,Y)&向き(10KEY参照)
-
- // PAL,BANK, SP,向き,動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1) ={$9, 1,$C0, 0, -1} //カリス
- %mandef(2) ={$A, 0,$C7, 0, 0} //リアナ
- %mandef(6) ={$A, 0,$C6, 0, 0} //リアナ
- %manpoint(6)={16,11}
- %mandef(3) ={$2, 1,$A6, 0, -1} //扉
- %mandef(4) ={$2, 1,$AA, 0, -1} //扉
- %mandef(5) ={$2, 1,$AE, 0, -1} //水差し
-
- // カリスはベッドに横になり、傍らにリアナが心配そうにカリスの顔をのぞき込ん
- // でいる。
-
- &on
- &wait 100
-
- &monsprint 24,32,リアナ
- !o(1)j(2)リアナj(0);カリス、カリスってば、ねえっカリス、大丈夫。pc
- %mandef(1) ={$9, 1,$C1, 0, -1} //カリス
- &wait 50
- &on
- %mandef(1) ={$9, 1,$C2, 0, -1} //カリス
- &wait 50
- &on
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);…ううぅ…リアナ?pc
- %mandef(2) ={$A, 0,$C8, 0, 0} //リアナ
- %mandef(6) ={$A, 0,$00, 0, 0} //リアナ
- &on
- &monsprint 24,32,リアナ
- !o(1)j(2)リアナj(0);随分うなされてたけど、どうしたの?;船酔い?;薬もらって
- !きてあげようか?pc
- %mandef(1) ={$9, 1,$C3, 0, -1} //カリス
- &wait 30
- &on
- %mandef(1) ={$9, 1,$C4, 0, -1} //カリス
- &wait 30
- &on
- %mandef(1) ={$9, 1,$C5, 0, -1} //カリス
- &wait 50
- &on
- %mandef(1) ={$9, 1,$C6, 0, -1} //カリス
- &wait 30
- &on
- %mandef(1) ={$9, 1,$C7, 0, -1} //カリス
- &wait 30
- &on
- %mandef(1) ={$9, 1,$C8, 0, -1} //カリス
- &wait 30
- &on
- %mandef(1) ={$9, 1,$C9, 0, -1} //カリス
- &wait 20
- &on
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);いや、なんだかとても恐ろしい夢をみてたみたいだ…。p
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);(なんなんだあの夢は、あれはオレなのか?)p
- &monsprint 24,32,リアナ
- !o(1)j(2)リアナj(0);大丈夫…。pc
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);…ああ、平気だよ。pc
- &monsprint 24,32,リアナ
- !o(1)j(2)リアナj(0);そう。;あともう少しでダリムラクスに着くそうよ。
- %mandef(2) ={$A, 0,$C9, 0, 0} //リアナ
- &wait 30
- &on
- %mandef(2) ={$A, 0,$CA, 0, 0} //リアナ
- &wait 30
- &on
- %mandef(2) ={$A, 0,$CB, 0, 0} //リアナ
- &wait 30
- &on
- %mandef(2) ={$A, 0,$CC, 0, 0} //リアナ
- %mandef(5) ={$2, 1,$AF, 0, -1} //水差し
- &wait 30
- &on
- %mandef(2) ={$A, 0,$CD, 0, 0} //リアナ
- &wait 30
- &on
- %mandef(2) ={$A, 0,$CF, 0, 0} //リアナ
- %mandef(6) ={$A, 0,$CE, 0, 0} //リアナ
- &wait 30
- &on
- !;はい、お水。pc
- %mandef(1) ={$9, 1,$CA, 0, -1} //カリス
- &wait 20
- &on
- %mandef(1) ={$9, 1,$CB, 0, -1} //カリス
- &wait 50
- &on
- %manpoint(2)={100,100}
- %manpoint(6)={100,100}
- %mandef(7) ={$A, 0,$80, 4, 0} //リアナ
- %manpoint(7)={18,11}
- &on
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);ありがとう。pc
- &monsprint 24,32,リアナ
- !o(1)j(2)リアナj(0);じゃあ、またあとでね。pc
- &manmove 7,6,6,-8
-
- %mandef(3) ={$2, 1,$A7, 0, -1} //扉
- %mandef(4) ={$2, 1,$AB, 0, -1} //扉
- &wait 20
- &on
- %mandef(3) ={$2, 1,$A8, 0, -1} //扉
- %mandef(4) ={$2, 1,$AC, 0, -1} //扉
- &wait 20
- &on
- %mandef(3) ={$2, 1,$A9, 0, -1} //扉
- %mandef(4) ={$2, 1,$AD, 0, -1} //扉
- &wait 20
- &on
-
- &manmove 7,8,8,8,-2
-
- %mandef(3) ={$2, 1,$A9, 0, -1} //扉
- %mandef(4) ={$2, 1,$AD, 0, -1} //扉
- &wait 20
- &on
- %mandef(3) ={$2, 1,$A8, 0, -1} //扉
- %mandef(4) ={$2, 1,$AC, 0, -1} //扉
- %manpoint(7)={100,100}
- &wait 20
- &on
- %mandef(3) ={$2, 1,$A7, 0, -1} //扉
- %mandef(4) ={$2, 1,$AB, 0, -1} //扉
- &wait 20
- &on
- %mandef(3) ={$2, 1,$A6, 0, -1} //扉
- %mandef(4) ={$2, 1,$AA, 0, -1} //扉
- &wait 20
- &on
-
- &wait 80
- %mandef(1) ={$9, 1,$CC, 0, -1} //カリス
- &wait 20
- &on
- %mandef(1) ={$9, 1,$CD, 0, -1} //カリス
- &wait 50
- &on
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);(あの少女、wいや…)pc
- &wait 50
-
- &monsprint 0,80,OP_M03
- &wait 200
- &monsprint 0,80,消し
- &monsprint 128,80,消し
-
- &bgm -1
- &contrast 0
- &wait 300
- &partyset 1,2
- &goto MATI1
-
- //━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
- [FIELD]//フィールド
- &bgm 12
- &sppsp CHR\CHR01.SPP //SPP(人/スプライト)ファイルを設定
- &map MAP\FIELD.MAP //マップの設定
- &mapsp MAP\FIELD.SP //BGの設定
- &mappal MAP\FIELD.PAL //BGパレットの設定
- &if(進行==27){
- &mappal MAP\FIELD_.PAL //BGパレットの設定
- }
- &patternpal GR\CG.PAL //モンスター用パレット
- %partypoint={0,0,-2} //このブロックでの初期位置(X,Y)&向き(10KEY参照)
- &partyspeed 1 //移動速度(1:遅い,2:速い)
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1) ={$6 , 1,$65, 2, -1} //ダリムラクス港
- %mandef(2) ={$6 , 1,$66, 2, -1} // 〃
- %mandef(3) ={$6 , 1,$63, 2, -1} //アルテガ港
- %mandef(4) ={$6 , 1,$64, 2, -1} // 〃
- %mandef(5) ={$6 , 1,$63, 2, -1} //リーナス港
- %mandef(6) ={$6 , 1,$64, 2, -1} // 〃
- &if(進行<7){
- %mandef(7) ={$1 , 1,$67, 2, -1} //岩
- }
- %mandef(8) ={$6 , 1,$61, 2, -1} //ティット港
-
- &on
- &if(進行==5){//岩壊しへ
- %mandef(9) ={$B,0,$60,6,-1} //ダル
- %manpoint(9)={188,153}
- &on
- &partymove -4
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);おじさん、おまたせ。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);おお、来てくれたか。;ちょっと遅いんで心配になっ
- !たぞ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);すまない。;旅の疲れがでたみたいで。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);つまり、寝坊しちゃったの。ww;でも、ぐっすり眠
- !れたから今日は頑張るよ!pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);そりゃあ、頼もしいな。ww;さあ、現場はこの街道を
- !北に行ったところだ。pc
- &partyset 1,2,3
- %manpoint(9)={1000,1000}
- &on
- 進行=6
- }
-
- &if(進行==8){//盗賊のアジトへ
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ダル、盗賊のアジトはここから北東に行った山の
- !洞窟だったよな。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);ああ、ここの町の人間なら誰でも知ってる洞窟だ。;
- !昔、戦争があった時に、避難場所になってたそうだ。p;それで
- !、さっきの会議で話したとおり、町の者しか知らない抜け道が
- !いくつかある。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);それを通って、盗賊のアジトに潜入するわけだろ。
- !pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);だが、中の様子が判からんからな。;もし、救出が困
- !難な状況なら、一旦戻り、討伐隊を待ってから、新たに手を考
- !えよう。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);うまくいくといいけど。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);ああ、とにかく全力を尽くそう。pc
- 進行=9
- }
-
- &if(進行==16){//セフラへ
- &partymove 4,4
- &goto IV09
- }
- &if(進行==19){//アルテガへ
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);このまま街道を西に行けばアルテガだ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);リザレアの手がかり、きっと見つかるよ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ん、ああ。pc
- 進行=20
- }
- &if(進行==27 and 夜==0){//ティットへ
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ティットはここから西にあるんだよな。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);はい。w;まずは南に向かって山を迂回しなくて
- !はなりません。p;ほとんど道が無いので、リアナさんには少し
- !厳しいかも…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);そうか、とにかく急いでティットへ向かおう。pc
- 夜=1
- }
-
- #@20 //普通の街道
- &if(%direc>=0){&jmp コマンド}
-
- #@0 //ダリムラクス
- &if(%direc<0 and 平原==1){
- 平原=0
- 町=1
- &goto MATI1
- }
- &if(%direc>=0){&jmp コマンド}
-
- #@1 //崖崩れ
- &if(%direc<0){
- &if(進行<7){&goto IV04}
- &if(進行==7){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);今は、ダリムラクスに戻っている暇は無
- !いな。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);ああ、悪いがエイアムに急いでくれないか。
- !pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);2人とも…?pc
- &partymove 8
- &&
- }
- &if(進行>=9 and 進行<=11){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);今は、ダリムラクスに戻っている場合じ
- !ゃない。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);その通りだ。;早く、連れさらわれた町の者
- !を助け出さなくては。pc
- &partymove 8
- &&
- }
- &if(進行==12){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);エイアムで皆が待っている。;ダリムラク
- !スに行くなら後ででもいいな。pc
- &partymove 8
- &&
- }
- }
- &if(%direc>=0){&jmp コマンド}
-
- #@2 //エイアム
- &if(%direc<0){
- 町=2
- &if(進行==7){&goto IV05}
- &if(進行==12){&goto IV06}
- &goto MATI2
- }
- &if(%direc>=0){&jmp コマンド}
-
- #@3 //盗賊のアジト
- &if(%direc<0){
- &if(進行==7){
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);ここに近付いちゃいかん。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);えっ、wどうして。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);ここは町を再三襲ってきている盗賊どもの
- !アジトなんだ。p;それで、私は町の代表として、その
- !盗賊どもの討伐を軍に願い出に行っていたんだ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);そうだったのか。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);じゃあ、盗賊に見つからないうちにここ
- !を離れましょう。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);そうしよう。;どうも町が気になって仕方な
- !い。w;まさかとは思うが…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…わかった。;急いでエイアムに向かおう。
- !pc
- &&
- }
- &if(進行==12){
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);さあ、あとは兵隊に任せて町に戻ろう。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、救出された皆も戻ってるだろうし
- !な。pc
- &&
- }
- &if(進行>25){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(ここにはもう用はないな)pc
- &&
- }
- &if(進行>13){
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);ここ、盗賊のアジトがあったところよね。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);離れましょう。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);そうだな。pc
- &&
- }
- &if(進行==9){&partyset 3,1,7,8}
- &goto2 DUN1A,20,28,-4
- }
- &if(%direc>=0){&jmp コマンド}
-
- #@4 //渡し船 右
- &if(%direc<0){
- &if(進行==7){
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);ここは聖国オルテニスに行くための渡し場
- !だ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);聖国オルテニス…。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);ねえ、エイアム通り過ぎちゃたんじゃな
- !い。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);すまんが、こんな寄り道をしてる場合じゃ
- !ないんだ…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…わかった。;急いでエイアムに向かおう。
- !pc
- &&
- }
- &if(進行<=11){
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);ここは聖国オルテニスに行くための渡し場
- !だが…。p;こんなところに来ている暇はないぞ。;早
- !く人質を救出せねば。pc
- &&
- }
- &if(進行==12){
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);ここは聖国オルテニスに行くための渡し場
- !だが…。p;寄り道せずにエイアムに戻ろう。;皆が待
- !っている。pc
- &&
- }
- 船=1
- &goto FUNE
- }
- &if(%direc>=0){&jmp コマンド}
-
- #@5 //渡し船 左
- &if(%direc<0){
- 船=2
- &goto FUNE
- }
- &if(%direc>=0){&jmp コマンド}
-
- #@6 //セフラ
- &if(%direc<0){
- &if(進行>=42 and 進行<46){
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);セフラもアルテガと同じよ。;聖騎士団が
- !常駐しているから。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);みつかっちゃまずいな。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);ええ。;さ、他の場所へ行きましょう。pc
- &&
- }
- &if(進行==46){
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);カリス、セフラも危険だ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);オレはオルテニスじゃ、お尋ね者だもん
- !な。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);フフ、そうね。pc
- &&
- }
- 町=3
- &goto MATI3
- }
- &if(%direc>=0){&jmp コマンド}
-
- #@7 //国境の砦
- &if(%direc<0){
- &goto SEKI
- }
- &if(%direc>=0){&jmp コマンド}
- #@8 //アルテガ
- &if(%direc<0 and 平原==1){
- 平原=0
- &if(進行==27){//進入禁止
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);今ここに戻ったら捕まるな。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);ええ、早くティットへ向かいましょう。
- !pc
- &&
- }
- &if(進行>=42 and 進行<46){
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);アルテガに入るのはよしましょう。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);そうだよな。;ここじゃ、オレはお尋ね者
- !だからな。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);ええ。;それに私も任務中にこんなとこを
- !うろうろしてるのが知れたら、面倒だわ。pc
- &&
- }
- &if(進行==46){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);アルテガには近付かない方がいいな。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);ま、僕たちの方もな。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);任務中にぶらぶらとしてたんじゃ面目が
- !ないものね。pc
- &&
- }
- 町=4
- &goto MATI4
- }
- &if(%direc>=0){&jmp コマンド}
-
- #@9 //ティット
- &if(%direc<0){
- 町=5
- &goto MATI5
- }
- &if(%direc>=0){&jmp コマンド}
-
- #@10 //アンヌの森
- &if(%direc<0){
- &if(進行<31){
- &if(%partyexist(2)>0){
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);なんだろ、ここ。w;すごく嫌な
- !感じがする。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、ほんとだな。w;でも、今
- !はこんなところに寄っている場合じゃない。
- !p;早くアルテガの図書館でリザレアについて
- !調べなければ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);うん、そうだね。w;早く行こう。
- !pc
- }
- &if(%partyexist(4)>0){
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);なんでしょう、ここ。w;すご
- !く気味が悪い。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、なんだろう。w;でも、今
- !はこんなところに寄っている場合じゃない。
- !p;早くリアナを医者に診せなければ。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);ええ、そうですね。pc
- }
- &partymove 2,2,2
- }
- &if(進行==31 or 進行==32){&goto DUN3}
- &if(進行>32){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(もうこの森に入る必要はないな)pc
- &partymove 2,2,2
- }
- }
- &if(%direc>=0){&jmp コマンド}
-
- #@11 //砂漠の怪
- &if(%direc<0){
- &if(進行<35){
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);あのー、カリスさんどこへ行かれるんですか?pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);えっ!ああ、すまない。w;えーと、戻ろう。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);はい、そうしましょう。p
- !o(1)j(2)ルシェルj(0);(カリスさんてひょっとして方向音痴?)pc
- &partymove 8,8
- }
- &if(進行>=35 and 進行<=37){&goto DUN4}
- &if(進行==38 or 進行==39){
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);リーナスへ向かおう。;そこでヤツのこと
- !を話すよ。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);リーナスは直ぐそこよ。;とにかく、体を
- !休めたいわ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、わかった。pc
- &partymove 2,2
- }
- }
- &if(%direc>=0){&jmp コマンド}
-
- #@12 //リーナス
- &if(%direc<0 and 平原==1){
- 平原=0
- 町=6
- &goto MATI6
- }
- &if(%direc>=0){&jmp コマンド}
- #@13 //ルシェル登場
- &if(進行==15 and %direc<0){&goto IV08}
- &if(%direc>=0){&jmp コマンド}
-
- #@14 //野宿・オルテニス移動禁止
- &if(%direc<0 and 進行<38){
- &if(進行<27){//移動禁止
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);あれ?w;ここどこ?pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);な、wなんで黙ってるの?pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…迷ったみたいだ。;引き返そう。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);そ、wそうしよう。pc
- &partymove 2,2
- &&
- }
- &if(進行==27){//野宿へ
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);あっ、痛いっ!pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);おい、大丈夫か。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);すいません。;ちょっと足が…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ちょっと急ぎ過ぎたな、すまない。p;
- !ん、あそこに森があるな。;今夜はあそこで野宿しよ
- !う。;リアナも疲れただろうから。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);すいません。pc
- &partymove 8,8,8,8,8,8,8,6,6
- &goto IV17
- }
- &if(進行>27 and 進行<31){//移動禁止
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);早く、リアナさんをお医者様にお連れ
- !しないと。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);わかってる、wわかってるよ。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);(カリスさん、混乱しているの)pc
- }
- &if(進行>30 and 進行<33){//移動禁止
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);アンヌの森はティットの西ですよ。;
- !こっちだと逆方向です。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);わかってる、wわかってるよ。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);(カリスさん、すごく混乱している)pc
- }
- &if(進行==33 or 進行==34){//移動禁止
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);ティットへ戻るんじゃないのか。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);もうとっくに通り過ぎているみたいだけ
- !ど…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);えっ!;ああ、すまない。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);早く、薬草を持っていきましょう。p
- !o(1)j(2)ルシェルj(0);(カリスさんて、方向音痴なのかしら)pc
- }
- &if(進行>34 and 進行<38){//移動禁止
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);wカリス、砂漠はティットの南よ…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、すまない。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);カリス、大丈夫か。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);大丈夫だ。;さあ、砂漠へ向かおう。pc
- &monsprint 24,32,アゼル,0
- &monsprint 104,32,ダリア,1
- !o(1)j(2)アゼル・ダリアj(0);…。pc
- }
- &partymove 8,8
- }
- &if(%direc>=0){&jmp コマンド}
-
- #@16 //セフラ移動禁止
- &if(%direc<0){
- &if(進行==27){//野宿へ
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);カリスさん、ティットはこっちじゃあ
- !りませんよ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);そうだ、wそうだよな。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);(カリスさんどうしたのかしら?)pc
- &partymove 4,4
- }
- }
- &if(%direc>=0){&jmp コマンド}
-
- #@30
- &if(平原==0){平原=1} //誤操作マップ切り替え防止
- &if(%direc>=0){&jmp コマンド}
-
- #@44 //敵出現
- &if(%direc>=0){&jmp コマンド} //イベント上でボタンが押されたら処理中断
- &if(平原==0){平原=1} //誤操作マップ切り替え防止
- &if(敵出現==1){&&} //デバックモード
- &if(%rnd(100)<80){&&} //乱数が80より小さければ処理中断
- &if(%systime<50){&&} //前回の戦闘から50ターン経っていなければ処理中断
- // &if(%systime<80){&&} //前回の戦闘から80ターン経っていなければ処理中断
-
- 敵確率1=%rnd(確変)
- &if(敵確率1>=0 and 敵確率1<295){獲物=★アルマジロ}
- &if(敵確率1>=295 and 敵確率1<520){獲物=★ワニ}
- &if(敵確率1>=520 and 敵確率1<745){獲物=★サイ}
- &if(敵確率1>=745 and 敵確率1<970){獲物=★ゾウ}
- &if(敵確率1>=970){
- 敵確率2=%rnd(4)
- &if(敵確率2==0){獲物=★白虎}
- &if(敵確率2==1){獲物=★青竜}
- &if(敵確率2==2){獲物=★朱雀}
- &if(敵確率2==3){獲物=★玄武}
- }
- 獲物数=1+%rnd(3)
- &patternpal GR\CG2.PAL //モンスター用パレット
- &bgm 0
- &battle 0,15,獲物,獲物数
- &patternpal GR\CG.PAL //CG用パレット
-
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &if(%exitcode==99){ //逃亡したら中断
- &bgm 12
- %systime=0
- &&
- }
- 獲物数=%rnd(獲物数+1)
- &if(獲物数>0 and 捕獲数<(10*魔法のロープ)){&jsr 獣捕獲}
- &bgm 12
- %systime=0
-
- #@45 //敵出現
- &if(%direc>=0){&jmp コマンド} //イベント上でボタンが押されたら処理中断
- &if(平原==0){平原=1} //誤操作マップ切り替え防止
- &if(敵出現==1){&&} //デバックモード
- &if(%rnd(100)<80){&&} //乱数が80より小さければ処理中断
- &if(%systime<50){&&} //前回の戦闘から50ターン経っていなければ処理中断
- // &if(%systime<80){&&} //前回の戦闘から80ターン経っていなければ処理中断
-
- 敵確率1=%rnd(確変)
- &if(敵確率1>=0 and 敵確率1<300){獲物=★サソリ}
- &if(敵確率1>=300 and 敵確率1<525){獲物=★ダチョウ}
- &if(敵確率1>=525 and 敵確率1<750){獲物=★ラクダ}
- &if(敵確率1>=750 and 敵確率1<975){獲物=★ライオン}
- &if(敵確率1>=975){
- 敵確率2=%rnd(4)
- &if(敵確率2==0){獲物=★白虎}
- &if(敵確率2==1){獲物=★青竜}
- &if(敵確率2==2){獲物=★朱雀}
- &if(敵確率2==3){獲物=★玄武}
- }
- 獲物数=1+%rnd(3)
- &patternpal GR\CG2.PAL //モンスター用パレット
- &bgm 0
- &battle 0,15,獲物,獲物数
- &patternpal GR\CG.PAL //CG用パレット
-
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &if(%exitcode==99){ //逃亡したら中断
- &bgm 12
- %systime=0
- &&
- }
- 獲物数=%rnd(獲物数+1)
- &if(獲物数>0 and 捕獲数<(10*魔法のロープ)){&jsr 獣捕獲}
- &bgm 12
- %systime=0
-
- #@46 //敵出現
- &if(%direc>=0){&jmp コマンド} //イベント上でボタンが押されたら処理中断
- &if(平原==0){平原=1} //誤操作マップ切り替え防止
- &if(敵出現==1){&&} //デバックモード
- &if(%rnd(100)<80){&&} //乱数が80より小さければ処理中断
- &if(%systime<50){&&} //前回の戦闘から50ターン経っていなければ処理中断
- // &if(%systime<80){&&} //前回の戦闘から80ターン経っていなければ処理中断
-
- &patternpal GR\CG2.PAL //モンスター用パレット
- 敵確率1=%rnd(確変)
- &if(敵確率1>=0 and 敵確率1<305){獲物=★ワシ}
- &if(敵確率1>=305 and 敵確率1<530){獲物=★ヤギ}
- &if(敵確率1>=530 and 敵確率1<755){獲物=★ヒョウ}
- &if(敵確率1>=755 and 敵確率1<980){獲物=★クマ}
- &if(敵確率1>=980){
- 敵確率2=%rnd(4)
- &if(敵確率2==0){獲物=★白虎}
- &if(敵確率2==1){獲物=★青竜}
- &if(敵確率2==2){獲物=★朱雀}
- &if(敵確率2==3){獲物=★玄武}
- }
- 獲物数=1+%rnd(3)
- &patternpal GR\CG2.PAL //モンスター用パレット
-
- &bgm 0
- &battle 0,15,獲物,獲物数
- &patternpal GR\CG.PAL //CG用パレット
-
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &if(%exitcode==99){ //逃亡したら中断
- &bgm 12
- %systime=0
- &&
- }
- 獲物数=%rnd(獲物数+1)
- &if(獲物数>0 and 捕獲数<(10*魔法のロープ)){&jsr 獣捕獲}
- &bgm 12
- %systime=0
-
-
- #@47 //敵出現
- &if(%direc>=0){&jmp コマンド} //イベント上でボタンが押されたら処理中断
- &if(平原==0){平原=1} //誤操作マップ切り替え防止
- &if(敵出現==1){&&} //デバックモード
- &if(%rnd(100)<80){&&} //乱数が80より小さければ処理中断
- &if(%systime<50){&&} //前回の戦闘から50ターン経っていなければ処理中断
- // &if(%systime<80){&&} //前回の戦闘から80ターン経っていなければ処理中断
-
- 敵確率1=%rnd(確変)
- &if(敵確率1>=0 and 敵確率1<310){獲物=★カエル}
- &if(敵確率1>=310 and 敵確率1<535){獲物=★トカゲ}
- &if(敵確率1>=535 and 敵確率1<760){獲物=★ウマ}
- &if(敵確率1>=760 and 敵確率1<985){獲物=★オオカミ}
- &if(敵確率1>=985){
- 敵確率2=%rnd(4)
- &if(敵確率2==0){獲物=★白虎}
- &if(敵確率2==1){獲物=★青竜}
- &if(敵確率2==2){獲物=★朱雀}
- &if(敵確率2==3){獲物=★玄武}
- }
- 獲物数=1+%rnd(3)
- &patternpal GR\CG2.PAL //モンスター用パレット
-
- &bgm 0
- &battle 0,15,獲物,獲物数
- &patternpal GR\CG.PAL //CG用パレット
-
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &if(%exitcode==99){ //逃亡したら中断
- &bgm 12
- %systime=0
- &&
- }
- 獲物数=%rnd(獲物数+1)
- &if(獲物数>0 and 捕獲数<(10*魔法のロープ)){&jsr 獣捕獲}
- &bgm 12
- %systime=0
-
-
- #@48 //敵出現
- &if(%direc>=0){&jmp コマンド} //イベント上でボタンが押されたら処理中断
- &if(平原==0){平原=1} //誤操作マップ切り替え防止
- &if(敵出現==1){&&} //デバックモード
- &if(%rnd(100)<80){&&} //乱数が80より小さければ処理中断
- &if(%systime<50){&&} //前回の戦闘から50ターン経っていなければ処理中断
- // &if(%systime<80){&&} //前回の戦闘から80ターン経っていなければ処理中断
-
- 敵確率1=%rnd(確変)
- &if(敵確率1>=0 and 敵確率1<315){獲物=★カラス}
- &if(敵確率1>=315 and 敵確率1<540){獲物=★キツネ}
- &if(敵確率1>=540 and 敵確率1<765){獲物=★イノシシ}
- &if(敵確率1>=765 and 敵確率1<990){獲物=★シカ}
- &if(敵確率1>=990){
- 敵確率2=%rnd(4)
- &if(敵確率2==0){獲物=★白虎}
- &if(敵確率2==1){獲物=★青竜}
- &if(敵確率2==2){獲物=★朱雀}
- &if(敵確率2==3){獲物=★玄武}
- }
- 獲物数=1+%rnd(3)
- &patternpal GR\CG2.PAL //モンスター用パレット
-
- &bgm 0
- &battle 0,15,獲物,獲物数
- &patternpal GR\CG.PAL //CG用パレット
-
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &if(%exitcode==99){ //逃亡したら中断
- &bgm 12
- %systime=0
- &&
- }
- 獲物数=%rnd(獲物数+1)
- &if(獲物数>0 and 捕獲数<(10*魔法のロープ)){&jsr 獣捕獲}
- &bgm 12
- %systime=0
-
-
- #@49 //敵出現
- &if(%direc>=0){&jmp コマンド} //イベント上でボタンが押されたら処理中断
- &if(平原==0){平原=1} //誤操作マップ切り替え防止
- &if(敵出現==1){&&} //デバックモード
- &if(%rnd(100)<80){&&} //乱数が80より小さければ処理中断
- &if(%systime<50){&&} //前回の戦闘から50ターン経っていなければ処理中断
- // &if(%systime<80){&&} //前回の戦闘から80ターン経っていなければ処理中断
-
- 敵確率1=%rnd(確変)
- &if(敵確率1>=0 and 敵確率1<320){獲物=★ネズミ}
- &if(敵確率1>=320 and 敵確率1<545){獲物=★ウサギ}
- &if(敵確率1>=545 and 敵確率1<770){獲物=★タヌキ}
- &if(敵確率1>=770 and 敵確率1<995){獲物=★イヌ}
- &if(敵確率1>=995){
- 敵確率2=%rnd(4)
- &if(敵確率2==0){獲物=★白虎}
- &if(敵確率2==1){獲物=★青竜}
- &if(敵確率2==2){獲物=★朱雀}
- &if(敵確率2==3){獲物=★玄武}
- }
- 獲物数=1+%rnd(3)
- &patternpal GR\CG2.PAL //モンスター用パレット
-
- &bgm 0
- &battle 0,15,獲物,獲物数
- &patternpal GR\CG.PAL //CG用パレット
-
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &if(%exitcode==99){ //逃亡したら中断
- &bgm 12
- %systime=0
- &&
- }
- 獲物数=%rnd(獲物数+1)
- &if(獲物数>0 and 捕獲数<(10*魔法のロープ)){&jsr 獣捕獲}
- &bgm 12
- %systime=0
-
-
- #1
- #2
- #3
- #4
- #5
- #6
- #7
- #8
- #50
- &&
- &label コマンド
- &if(デバック==0){
- %selectlist={動物捕獲数, ,セーブ,ロード,ゲーム終了}
- }&else{
- %selectlist={動物捕獲数, ,セーブ,ロード,ゲーム終了,LV99,敵出現}
- }
- 選択1=%select
- &if(選択1==0){
- !o(1);b(0)動物捕獲数 : f(捕獲数)/f(10*魔法のロープ)b(5)pc
- &jmp @b
- }
- &if(選択1==1){
- &jmp @b
- }
- &if(選択1==2){
- %partynamedef(0) = フィールド
- 外X=%px
- 外Y=%py
- &save 50,外X,外Y,2
- &jmp @b
- }
- &if(選択1==3){
- &load 1
- &jmp @b
- }
- &if(選択1==4){
- !o(1);ゲームを終了しますか?p
- &if(%inkeyn==0){
- !o(1);本当に終了してもよろしいですか?p
- &if(%inkeyn==0){
- !o(1);それでは終了します…。pc
- &end
- }
- }
- !c
- }
- &if(選択1==5){
- !o(1)b(5):パーティーのレベルを99にします。pc
- &jsr 99
- }
- &if(選択1==6){
- &if(敵出現==0){
- !o(1)b(5):敵が出現しなくします。pc
- 敵出現=1
- &&
- }
- &if(敵出現==1){
- !o(1)b(5):敵が出現します。pc
- 敵出現=0
- &&
- }
- }
- &&
-
- //クレイニル
- //━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
- [MATI1]//ダリムラクス
- &sppsp CHR\MATI.SPP //SPP(人/スプライト)ファイルを設定
- &if(町中==0){&bgm 13}
- &if(進行==2 or 進行==3){//夜の町
- &map MAP\MATI1B.MAP //マップの設定
- &mapsp MAP\MATI1B.SP //BGの設定
- &mappal MAP\MATI1B.PAL //BGパレットの設定
- }&else{
- &map MAP\MATI1.MAP //マップの設定
- &mapsp MAP\MATI1.SP //BGの設定
- &mappal MAP\MATI1.PAL //BGパレットの設定
- }
- %partypoint={31,0,2}
-
- &if(進行==2 or 進行==3){
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1) ={$9 , 0,$20, 0, -1} //カリス
- %mandef(2) ={$A , 0,$21, 0, -1} //リアナ
- %mandef(3) ={$9 , 0,$22, 0, -1} //酒のみ
- %mandef(4) ={$9 , 0,$23, 0, -1} //2人組
- %mandef(5) ={$9 , 0,$24, 0, -1} //2人組
- %mandef(6) ={$D , 0,$25, 0, -1} //おばさん
- %mandef(7) ={$A , 0,$26, 0, -1} //おじさん
- %mandef(8) ={$E , 0,$27, 0, -1} //娼婦
- %mandef(9) ={$A , 0,$28, 0, -1} //旅人
- }&else{
- %mandef(1) ={$9 , 0,$00, 0, -1} //カリス
- %mandef(4) ={$B , 0,$03, 0, -1} //若者女
- %mandef(5) ={$A , 0,$04, 0, -1} //猫
- %mandef(6) ={$B , 0,$05, 0, -1} //カラス
- %mandef(7) ={$B , 0,$06, 0, -1} //カラス
- %mandef(8) ={$F , 0,$07, 0, -1} //水まき女
- %mandef(9) ={$F , 0,$08, 0, -1} //水まき女
- %mandef(10)={$A , 0,$09, 0, -1} //騎士
- %mandef(11)={$F , 0,$0A, 0, -1} //冒険者
- %mandef(12)={$C , 0,$0B, 0, -1} //子供男
- %mandef(13)={$A , 0,$0C, 0, -1} //子供女
- %mandef(14)={$9 , 0,$0D, 0, -1} //若者男
- %mandef(16)={$9 , 0,$0F, 0, -1} //老人女
- &if(%partyexist(2)!=0){
- %mandef(2) ={$A , 0,$01, 0, -1} //リアナ
- %mandef(3) ={$A , 0,$02, 0, -1} //リアナ
- }
- &if(%partyexist(3)!=0){
- %mandef(15)={$B , 0,$0E, 0, -1} //ダル
- }
- &if(%partyexist(5)!=0){
- %mandef(17)={$C , 0,$29, 0, -1} //アゼル
- }
- &if(%partyexist(6)!=0){
- %mandef(18)={$C , 0,$2A, 0, -1} //ダリア
- }
- }
- &on
- &if(進行==4){
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);うーん、w良く眠れた。;やっぱフカフカのベッド
- !は最高!pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);さぁて、ダルが町の外で待ってるだろうから、行
- !こうか。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);あっ、そうだったねぇ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);おい、忘れてたのか?pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);え、そういうわけじゃないけど。;あんまり気持ち
- !いい朝だから、つい…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);朝?w;もう昼に近いぜ。p;そうだ、店も開いてる
- !時間だろうから、少し準備していこう。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);う、wうん。pc
- 進行=5
- }
- &if(進行==2){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);さあ、もう真っ暗だ。;とっとと宿を探そう。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);うん。;もぉ、満腹でくたくただよ。pc
- 進行=3
- }
- &if(進行==0){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);やっと着いたな。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);うん。;で、これからどうするぅ?pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);とりあえず、この辺りでリザレアについて色々と
- !聞いてみよう。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);オッケー。;じゃ、その後、お城を見に行こうよ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);えっ!pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);前にね町長さんに聞いたんだ。;お城って物凄く大
- !きい建物でとってもキレイなんだって。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(…この間の海岸じゃ、あんなに暗かったのにな)pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);焦ってもしようがないでしょ。;せっかく島を出れ
- !たんだから、色々と見て回ろう。p;それに色々と見ているうち
- !に何か思い出すかもしれないし。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ぷっ、wははははー!pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);な、w何よぉ~!pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ハハハ…wうん。;わかった情報集めたら、城を見
- !に行って、それから宿を探そうぜ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);う、うんっ…。p
- !o(1)j(2)リアナj(0);(もぅ、人の気も知らないで…。;
- !何も笑うこと無いじゃないの。p;でも、笑ってるカリス…wま
- !、いっか)pc
- 進行=1
- }
- &label メニュー1
- &if(進行==1 and IC1+IC2+IC3+IC4==4){
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);ふぅ~。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);世界中の船が集まる港っていうくせに何の手がか
- !りも得られないなんて。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…w城でも見に行こうか。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);えっ、wうん…。pc
- 進行=2
- &goto IV01
- }
-
- %selectlist={移動,情報収集,地図,町を出る, ,システム}
- 選択1=%select
- &if(選択1<0 or 選択1==4){&jmp @b}
- &if(選択1==0){
- &if(進行==1){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);おっと、まずは色々と情報を集めないと
- !な。;見て回るのはそれから。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);うーん、早くお城見に行きたいなぁ。pc
- &jmp メニュー1
- }
- &label
- %selectlist={宿屋,雑貨屋,獣屋, ,町の外}
- 選択2=%select
- &if(選択2<0){&jmp メニュー1}
- &if(選択2==3){&jmp @b}
- &if(選択2==0){
- &if(進行==5){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);別に忘れ物してないよな。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);うん、w平気平気!pc
- &jmp @b
- }
- &if(進行==6){
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);ここで一泊している暇はないんだ
- !が、少しだけ休憩していくか。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、すまない。pc
- }
- &goto YADO
- }
- &if(選択2==1){
- &if(進行==3){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);もう閉店してるだろ。pc
- &jmp @b
- }&else{
- &goto MISE1
- }
- }
- &if(選択2==2){
- &if(進行==3){
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);お店、もう閉まってるよ。;きっ
- !と。pc
- &jmp @b
- }&else{
- &goto MISE2
- }
- }
- &if(選択2==4){
- &if(進行==1){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);おっと、まずは色々と情報を集めないと
- !な。;見て回るのはそれから。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);うーん、早くお城見に行きたいなぁ。pc
- &jmp @b
- }&else{
- &if(進行==3){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);こんな夜に外に出るのは危険だ
- !よ。;行く宛も無いし。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);明日は、あのおじさんのお仕事
- !があるから早く寝ないとね。pc
- &jmp @b
- }
- &if(進行==5){
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);さあ、おじさんのとこに行こう。
- !pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ。pc
- }
- 町中=0
- &goto2 FIELD,190,154,2
- }
- }
- }
- &if(選択1==1){
- &label 情報1
- %selectlist={町について,出来事,噂話,その他,目的}
- 選択2=%select
-
- &if(選択2==4){ //目的
- &jsr 目的
- }
-
- &if(選択2==0){ //町について
- &if(進行==1){
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);この町の名物は、やっぱりお城
- !だって。p;物知りそうなお爺さんがね、サイ
- !ンバラ城、別名白竜城って言うくらいきれい
- !だって言ってたよ。pc
- &wait 50
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);このダリムラクスから街道沿いを
- !北に行くと、エイアムという小さな町がある
- !そうだ。pc
- IC1=1
- }
- &if(進行==3){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ダリムラクスはクレイニル王国
- !の首都で、エイアムもジャスタン島もその領
- !土下にあるって。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);うん、一般常識だね。pc
- &wait 50
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);うー、酔っ払いばっかだよぉ。;
- !もぉ、早く宿に行こうよ。pc
- }
- &if(進行==5){
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);ここの港は世界一なんだって。;
- !そう言えば港にいっぱい船があったもんね。
- !pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ついでに海軍も世界一強力だっ
- !て話しだけど。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);海軍かぁ…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);まぁ、近ごろはそう大きな戦争
- !はないみたいだから、海軍の活躍といったら
- !海賊退治ぐらいみたいだ。pc
- }
- &if(進行>=6){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);もう、特に情報はないみたいだ
- !な。pc
- }
- }
- &if(選択2==1){ //出来事
- &if(進行==1){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);つい最近、この北にあるエイア
- !ムとを結ぶ街道で崖崩れがあって、通れなく
- !なってるって。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);あたしたちは今のところ関係無
- !いけど、エイアムに行く人達は困ってるでし
- !ょうね。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);それでじきに、軍が岩を壊しに
- !行くそうだよ。pc
- IC2=1
- }
- &if(進行==3){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);さすがに夜の町ともなるといろ
- !んな事件が起こるみたいだな。;リアナみた
- !いな女の子には危険だよ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);だからぁ、夕方のチンピラみた
- !いなのが出てこないうちに、宿に行こう。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、そうだな。p;でも、チン
- !ピラが絡んできたら、それはそれでリアナは
- !危険だよな。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);ど、wどういうことよぉ!pc
- }
- &if(進行==5){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);エイアムの町が最近、何度か盗
- !賊に襲われているらしい。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);エイアムって、あのおじさんの
- !町よね。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ。p;それで、エイアムから
- !緊急の要請があって討伐軍が出撃するそうだ。
- !pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);じゃあ、あのおじさんがその要
- !請をしに来たのかなぁ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);かもしれないな。p;だけど、街
- !道を塞いでいる岩が無くならないと、進軍も
- !出来ないだろ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);じゃあなぜ、早く岩を壊しに行
- !かないんだろ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);こういうのって、やたらと時間
- !が掛かるみたいだな。p;だから、ダルはリア
- !ナに頼んできたんじゃないか。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);ふーん、wそっか。;じゃあ、あ
- !たし頑張んないとねぇ。pc
- }
- &if(進行==6){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);昨日、町に魔導師が出没したら
- !しい、wって…。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);はは、wお嬢ちゃんのことだな。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);えっ、wええぇ!ww;あたしがニ
- !ュースになってるの。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);口は耳まで裂けて、目はつり上
- !がって、人間とは思えない不気味さだったっ
- !て話しだけど…。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);うっ、wひどーい!ww;あたし、
- !そんなんじゃないよぉ。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);まあ、ひとの話しってのは、そ
- !うおひれが付くもんだ。pc
- }
- &if(進行>=7){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);もう、特に情報はないみたいだ
- !な。pc
- }
- }
- &if(選択2==2){ //噂話
- &if(進行==1){
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);ねぇ、カリス。;最近各国の王族
- !やなんかが何者かに誘拐されているって噂よ。
- !pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、公式に言われているわけ
- !じゃないが、ここの王女も誘拐されたんじゃ
- !ないかって言ってたなぁ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);誘拐だなんて、島の外の世界っ
- !て色々と恐いこととかあるんだね。pc
- IC3=1
- }
- &if(進行==3 or 進行==5){
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);隣の国、聖国オルテニスには、
- !奇跡の力を持った救世主って呼ばれる人がい
- !るそうよ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);救世主?pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);聖国オルテニスっていったら、
- !オルトン教の発祥の地だから、そういう話し
- !も出てくるんでしょうね。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);オルトン教?pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);確か、世界中で多く信仰されて
- !る宗教だよ。;あたしはあんまりわかんない
- !けど。pc
- }
- &if(進行==6){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);町に出没した魔導師が子供をさ
- !らっているらしい、wって噂だよ…。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);こっちじゃ、w家畜を襲っているっ
- !て言ってたぞ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);もっ、wもぉ!ww;いい加減にし
- !て!pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);お嬢ちゃん。w;噂だよ、w噂。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);そういえば、リアナ。w;昨日の
- !夜ずっと居たか。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);カ、wカリスぅ。ww;岩を壊す前
- !にカリスの体で魔法の練習しようかなっ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);あ、wじょ、w冗談だよ…。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);ガハハ。w;2人は仲がいいなぁ。p
- !c
- }
- &if(進行>=7){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);もう、特に情報はないみたいだ
- !な。pc
- }
- }
- &if(選択2==3){ //その他
- &if(進行==1){
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);お金を稼ぐんだったら、森やな
- !んかで狩りをして獣屋に売るといいぜって、
- !ちょっと怖いおじさんが教えてくれたよ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);おいおい。;リアナはあんまりそ
- !ういうヤツに話しかけなくていいよ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);うん、そうする。;カリスが来て
- !くれなかったら、どこかに連れていかれそう
- !だった。p;…怖かったぁ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);でも、旅費を稼ぐことも考えて
- !おかないとなぁ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);あんまり狩りとか嫌だけど、し
- !ょうがないよね。pc
- IC4=1
- }
- &if(進行==3){
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);うぅ、また怖いおじさんが、お
- !金を稼ぐんだったらって…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);で?pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);嫌っ、w絶対言えないっ!pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…だから、一人で勝手に歩き回
- !るなって。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);だって、島にない色んなものが
- !あるんだもん。pc
- }
- &if(進行==5){
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);島の外の世界。w;ほんといろん
- !なものが溢れてる。;見たことのないものが
- !いっぱいある。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);リアナはずっと島で育ったんだ
- !もんな。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);うん、すごく世界が広がった。w
- !;これだけでもカリスについてきて良か
- !ったなぁ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ん、ああ。p
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(オレにはそう珍しいものには
- !感じられない。;有り触れた、ごく平凡な風
- !景にしか…)pc
- }
- &if(進行>=6 and 進行<42){
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);雑貨屋で売っている、ミントは
- !精神回復の薬なんだって。p;つまりあたしが
- !魔法を使い過ぎた時の回復には一番pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);じゃあ、是非買っておかないと
- !な。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);うん、よろしくね。pc
- }
- &if(進行>=42 and 進行<46){
- 不安++
- &if(不安>4){不安=4}
- &jsr その他
- }
- &if(進行==46){
- &jsr その他
- }
- }
- &if(選択2<0){&jmp メニュー1}
- &jmp 情報1
- }
- &if(選択1==2){
- &monsprint 64,24,MAP1
- !o(1):b(0) ◆ダリムラクス周辺地図◆b(5)pc
- &jmp メニュー1
- }
- &if(選択1==3){
- &if(進行==1){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);おっと、まずは色々と情報を集めないと
- !な。;見て回るのはそれから。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);うーん、早くお城見に行きたいなぁ。pc
- }&else{
- &if(進行==3){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);こんな夜に外に出るのは危険だ
- !よ。;行く宛も無いし。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);明日は、あのおじさんのお仕事
- !があるから早く寝ないとね。pc
- &jmp メニュー1
- }
- &if(進行==5){
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);さあ、おじさんのとこに行こう。
- !pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ。pc
- }
- 町中=0
- &goto2 FIELD,190,154,2
- }
- }
- &if(選択1==5){
- &label
- %selectlist={セーブ,ロード,ゲーム終了}
- 選択2=%select
- &if(選択2==0){
- 町中=0
- %partynamedef(0) = ダリムラクス
- &save 50
- &jmp @b
- }
- &if(選択2==1){
- 町中=0
- &load 1
- &jmp @b
- }
- &if(選択2==2){
- !o(1)b(5);ゲームを終了しますか?p
- &if(%inkeyn==0){
- !o(1)b(5);本当に終了してもよろしいですか?p
- &if(%inkeyn==0){
- !o(1)b(5);それでは終了します…。pc
- &end
- }
- }
- !c
- &if(選択2<0){&jmp メニュー1}
- &jmp @b
- }
- }
- &jmp メニュー1
- #50
-
- //━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
- [MATI2]//エイアム
- &if(進行<12){
- &if(町中==0){&bgm 26}
- &sppsp CHR\IV05.SPP //SPP(人/スプライト)ファイルを設定
- &map MAP\IV05.MAP //マップの設定
- &mapsp MAP\IV05.SP //BGの設定
- &mappal MAP\IV05.PAL //BGパレットの設定
- %partypoint={0,0,2}
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1) ={$9 , 0,$60, 2, -1} //カリス
- %mandef(3) ={$B , 0,$61, 2, -1} //ダル
- %mandef(4) ={$B , 0,$62, 2, -1} //マクス
- %mandef(5) ={$F , 0,$63, 2, -1} //ジョン
- %manpoint(1)={23,16}
- %manpoint(3)={13,13}
- %manpoint(4)={15,20}
- %manpoint(5)={16,6}
- %mandef(6) ={$5 , 0,$E0, 2, -1} //樽
- %mandef(7) ={$5 , 0,$E1, 2, -1} //樽
- %mandef(8) ={$5 , 0,$E2, 2, -1} //樽
- %mandef(9) ={$5 , 0,$E3, 2, -1} //箱
- %mandef(10)={$5 , 0,$E3, 2, -1} //箱
- %mandef(11)={$4 , 0,$E8, 2, -1} //壷
- %mandef(12)={$4 , 0,$E4, 2, -1} //壷
- %mandef(13)={$5 , 0,$E5, 2, -1} //人形
- %mandef(14)={$6 , 0,$E6, 2, -1} //宝箱
- %mandef(15)={$6 , 0,$E7, 2, -1} //宝箱
- %mandef(16)={$5 , 0,$E6, 2, -1} //宝箱
- %mandef(17)={$5 , 0,$E7, 2, -1} //宝箱
- %mandef(18)={$B , 0,$E9, 2, -1} //町の人
- %mandef(19)={$F , 0,$EA, 2, -1} //町の人
- %mandef(20)={$E , 0,$EB, 2, -1} //町の人
- %mandef(21)={$A , 0,$EC, 2, -1} //町の人
- %partypoint={31,0,2}
- }
-
- &if(進行>=12){
- &if(町中==0){&bgm 13}
- &sppsp CHR\MATI.SPP //SPP(人/スプライト)ファイルを設定
- &map MAP\MATI2.MAP //マップの設定
- &mapsp MAP\MATI2.SP //BGの設定
- &mappal MAP\MATI2.PAL //BGパレットの設定
- %partypoint={0,0,2}
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1)={$9 , 0,$2B, 2, -1} //カリス
- &if(%partyexist(2)!=0){
- %mandef(2)={$A , 0,$2C, 2, -1} //リアナ
- }
- &if(%partyexist(5)!=0){
- %mandef(3)={$C , 0,$2D, 2, -1} //アゼル
- }
- &if(%partyexist(6)!=0){
- %mandef(4)={$C , 0,$2E, 2, -1} //ダリア
- }
- %mandef(5)={$B , 0,$2F, 2, -1} //兵士
- %mandef(6)={$B , 0,$2F, 2, -1} //兵士
- %mandef(7)={$B , 0,$40, 2, -1} //犬
- %mandef(8)={$F , 0,$42, 2, -1} //町人
- %mandef(9)={$A , 0,$43, 2, -1} //町人
- %mandef(10)={$B, 0,$44, 2, -1} //町人
- %mandef(11)={$9, 0,$45, 2, -1} //町人
- %mandef(12)={$A, 0,$46, 2, -1} //町人
- %mandef(13)={$F, 0,$47, 2, -1} //旅人
- %mandef(14)={$B, 0,$48, 2, -1} //旅人
- %mandef(15)={$B, 0,$49, 2, -1} //町人
- %mandef(16)={$B, 0,$4A, 2, -1} //兵士
- %mandef(17)={$B, 0,$41, 2, -1} //犬
- }
-
- &on
- &if(進行==13){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);大分、元の町になってきたみたいだな。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);うん、ほんと良かった。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);店はまだ営業を再開できないみたいだ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);一番被害が大きかったみたいだから…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);仕方無いな。;必要な物は他で揃えよう。p;それと
- !少し旅費を稼がないとな。;オルテニスに行く渡し船もただじゃ
- !ないだろうから。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);結局、礼金は受け取らなかったもんね。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);まあ、こっちも色々と世話になったし。p;少し狩
- !りでもしていくか、wダリムラクスまで戻れば獣屋があるから
- !な。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);そぉだね。w;おじさんの家に泊めてもらえば、宿
- !代も浮くし。pc
- 進行=14
- }
- &label メニュー2
- %selectlist={移動,情報収集,地図,町を出る, ,システム}
- 選択1=%select
- &if(選択1<0 or 選択1==4){&jmp @b}
- &if(選択1<0){&jmp @b}
-
- &label
- &if(選択1==0){//移動
- %selectlist={ダルの家,宿屋,雑貨屋, ,町の外}
- 選択2=%select
- &if(選択2<0){&jmp メニュー2}
- &if(選択2==3){&jmp @b}
- &if(選択2==0){//ダルの家
- &if(進行>=42 and 進行<46){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ダルは留守のようだな。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);知り合いかしら。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、色々と世話になってね。p
- !c
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);そう、会えなくて残念ねぇ。pc
- &jmp @b
- }
- &if(進行==46){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ダルは留守のようだな。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);知り合いがいるのか。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、恩人だよ。;ま、お互い
- !ね。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);会えなくて残念ねぇ。pc
- &jmp @b
- }
- &goto DAIE
- }
- &if(選択2==1){//宿屋
- &if(進行<=11){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);だいぶ壊されたみたいだな。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);ああ。;もし休憩するんだったら、
- !私の家に寄るといい。pc
- &jmp @b
- }
- &if(進行<=26){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);営業再開にはまだかかるみたいだ
- !な。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);早く、元通りになるといいね。pc
- &jmp @b
- }
- &goto YADO
- }
- &if(選択2==2){//雑貨屋
- &if(進行<=11){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);店は完全に壊されたみたいだな。
- !pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);ああ。;とにかく今ある物だけで、
- !なんとかしよう。pc
- &jmp @b
- }
- &if(進行<=26){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);店の営業再開にはまだかかるみた
- !いだな。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);早く、元通りになるといいね。pc
- &jmp @b
- }
- &goto MISE1
- }
- &if(選択2==4){//町を出る
- 町中=0
- &goto2 FIELD,@2,2
- }
- }
-
- &if(選択1==1){
- &label 情報2
- %selectlist={町について,出来事,噂話,その他,目的}
- 選択2=%select
-
- &if(選択2==4){ //目的
- &jsr 目的
- }
-
- &if(進行<=11 and 選択2<4 and 選択2>=0){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);こんな時に話しを聞いている場合じゃな
- !いな。pc
- }&else{
- &if(選択2==0){ //町について
- &if(進行>=14 and 進行<42){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ここは、ほんと街道沿
- !いの小さな宿場町のようだな。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);そんな静かな町を盗賊
- !が襲ってくるなんて。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);でも、もうじきその静
- !かな町に戻るさ。pc
- }
- &if(進行>=42){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);もう、特に情報はない
- !みたいだな。pc
- }
- }
- &if(選択2==1){ //出来事
- &if(進行>=14 and 進行<42){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ここを襲った盗賊たち
- !は、ダリムラクスから来た軍隊によ
- !って壊滅させられたそうだ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);これでもう、この町が
- !襲われることはないわね。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);でも、ああいう輩って
- !いうのは次から次へと涌いてくる
- !ものさ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);そんな…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);だから、ダリムラクス
- !から常駐軍が置かれることになるみ
- !たいだ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);そうなんだ…。w;盗賊
- !に…、w軍隊か…。pc
- }
- &if(進行>=42){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);もう、特に情報はない
- !みたいだな。pc
- }
- }
- &if(選択2==2){ //噂話
- &if(進行>=14 and 進行<42){
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);ねえ、カリス。w;盗賊
- !がアジトにしていた洞窟に魔物が居
- !たって聞いたけど…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、居たよ。;ずいぶ
- !んと長い間、人の出入りがなかった
- !ようだからな。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);聖剣の洞窟にも居たけ
- !ど…。w;町を襲ってきたりしないの
- !かな。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);魔物は闇や静寂を好む
- !ようだから、そういうことはないだ
- !ろう。p;それに洞窟の近くの森を歩
- !いていても動物に遭っても、魔物に
- !遭うことはないだろ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);ま、そうだろうけど…。
- !pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);やつらのテリトリーに
- !近付かなければ、襲われることはな
- !いよ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);…魔物って、w一体なん
- !なんだろ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);それは…。w;オレにも
- !わかんないよ。pc
- }
- &if(進行>=42){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);もう、特に情報はない
- !みたいだな。pc
- }
- }
- &if(選択2==3){ //その他
- &if(進行>=14 and 進行<42){
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);この前、ダルに会いに
- !来ていた男の人ってさあ。;ダルと
- !どういう関係なんだろ。p;ダルに聞
- !いてもはぐらかされちゃうし。;あ
- !んまりしつこくも聞けないじゃない。
- !pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);たしか、エスキオって
- !人だよな。;ダルは旧友と言ってた
- !けど…。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);でも、ダルにまるっき
- !り敬語だったよ。;まるで家来かな
- !にかみたいに。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…変だったけど。w;ダ
- !ルのことをそう詮索するのはどうか
- !と思うぜ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);うん、あのおじさんは
- !とってもいい人だけどさ。;なんか
- !気になるのよねぇ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);女っていうのは、そう
- !いうのが好きらしいな。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);フフ。w;うちのママも
- !しょっちゅう噂話してたなぁ。p
- !o(1)j(2)リアナj(0);(パパやママ、皆元気
- !にしてるかなぁ…)pc
- }
- &if(進行>=42 and 進行<46){
- 不安++
- &if(不安>4){不安=4}
- &jsr その他
- }
- &if(進行==46){
- &jsr その他
- }
- }
- }
- &if(選択2<0){&jmp メニュー2}
- &jmp 情報2
-
- }
- &if(選択1==2){
- &monsprint 64,24,MAP2
- !o(1):b(0) ◆エイアム周辺地図◆b(5)pc
- &jmp メニュー2
- }
- &if(選択1==3){//町を出る
- 町中=0
- &goto2 FIELD,@2,2
- }
- &if(選択1==5){
- &label
- %selectlist={セーブ,ロード,ゲーム終了}
- 選択2=%select
- &if(選択2==0){
- 町中=0
- %partynamedef(0) = エイアム
- &save 50
- &jmp @b
- }
- &if(選択2==1){
- 町中=0
- &load 1
- &jmp @b
- }
- &if(選択2==2){
- !o(1)b(5);ゲームを終了しますか?p
- &if(%inkeyn==0){
- !o(1)b(5);本当に終了してもよろしいですか?p
- &if(%inkeyn==0){
- !o(1)b(5);それでは終了します…。pc
- &end
- }
- }
- !c
- &if(選択2<0){&jmp メニュー2}
- &jmp @b
- }
- }
- &jmp メニュー2
-
- //オルテニス
- //━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
- [MATI3]//セフラ
- &sppsp CHR\MATI.SPP //SPP(人/スプライト)ファイルを設定
- &if(町中==0){&bgm 13}
- &map MAP\MATI3.MAP //マップの設定
- &mapsp MAP\MATI3.SP //BGの設定
- &if(進行<19){
- &mappal MAP\MATI3B.PAL //BGパレットの設定
- }&else{
- &mappal MAP\MATI3.PAL //BGパレットの設定
- }
- %partypoint={0,0,2}
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1)={$2 , 0,$85, 2, -1} //階段
- %mandef(2)={$2 , 0,$86, 2, -1} //階段
- %mandef(3)={$3 , 0,$87, 2, -1} //階段
- %mandef(4)={$3 , 0,$88, 2, -1} //階段
-
- %mandef(5) ={$9 , 0,$89, 0, -1} //カリス
- %mandef(6) ={$9 , 0,$8A, 0, -1} //カリス
-
- &if(%partyexist(2)!=0){
- %mandef(7) ={$A , 0,$8B, 0, -1} //リアナ
- }
- &if(%partyexist(5)!=0){
- %mandef(8) ={$C , 0,$8C, 0, -1} //アゼル
- }
- &if(%partyexist(6)!=0){
- %mandef(9) ={$C , 0,$8D, 0, -1} //ダリア
- }
-
- %mandef(10) ={$B , 0,$8E, 0, -1} //女の子
- %mandef(11) ={$B , 0,$8F, 0, -1} //女の子
- %mandef(12) ={$B , 0,$A0, 0, -1} //男の子
- %mandef(13) ={$C , 0,$A1, 0, -1} //男の子
- %mandef(14) ={$B , 0,$A2, 0, -1} //仔犬
- %mandef(15) ={$B , 0,$A3, 0, -1} //親犬
- %mandef(16) ={$9 , 0,$A4, 0, -1} //カゴ女
- %mandef(17) ={$B , 0,$A5, 0, -1} //じいさん
- %mandef(18) ={$C , 0,$A6, 0, -1} //聖騎士
- %mandef(19) ={$A , 0,$A7, 0, -1} //男
- %mandef(20) ={$B , 0,$A8, 0, -1} //神父
- %mandef(21) ={$F , 0,$A9, 0, -1} //旅人
- %mandef(22) ={$A , 0,$AA, 0, -1} //母娘
- %mandef(23) ={$A , 0,$AB, 0, -1} //母娘
- %mandef(24) ={$D , 0,$AC, 0, -1} //旅人
-
-
- &on
- &if(進行==17){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);さあて、宿を探そうぜ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);う、wうん。w;…あのこ、大丈夫かなぁ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);聖騎士団の常駐軍がどうとか言ってたから、そこ
- !でどうにかしてもらえてるよ。;リアナが心配することじゃな
- !いよ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);…そうよね。w;大丈夫よね。pc
- 進行=18
- }
-
- &label メニュー3
- %selectlist={移動,情報収集,地図,町を出る, ,システム}
- 選択1=%select
- &if(選択1<0 or 選択1==4){&jmp @b}
- &if(選択1==0){
- &label
- %selectlist={宿屋,雑貨屋, ,町の外}
- 選択2=%select
- &if(選択2<0){&jmp メニュー3}
- &if(選択2==2){&jmp @b}
- &if(選択2==0){&goto YADO}
- &if(選択2==1){
- &if(進行==18){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);もう閉店してるだろ。pc
- &jmp @b
- }&else{
- &goto MISE1
- }
- }
- &if(選択2==3){
- &if(進行==18){
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);もうすぐ夜だよ。;街道沿いでも、夜に外を
- !歩くのは危ないよ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、わかってるよ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);(でも、逸る気持ちわかるよ…)pc
- &jmp @b
- }&else{
- 町中=0
- &goto2 FIELD,@6,2
- }
- }
- }
- &if(選択1==1){
- &label 情報3
- %selectlist={町について,出来事,噂話,その他,目的}
- 選択2=%select
-
- &if(選択2==0){ //町について
- &if(進行<=19){
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);この町は西のクレイニア国と北
- !にあるアザム国とを結ぶ拠点なんだって。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);アザム国…。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);世界最大と言われている国だよ
- !。p;この町の北の国境には関所が設けられて
- !いるそうよ。pc
- }
- &if(進行>19){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);この町は交通の拠点というだけ
- !でなく。;他の国へオルトン教を広めるため
- !の拠点にもなっているようだ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);ふうん、なるほどねぇ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);おまけにクレイニルの聖騎士団
- !が常駐しているから、軍事拠点にもなりうる
- !んだ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);w戦争wね…。pc
- }
- }
- &if(選択2==1){ //出来事
- &if(進行==18){
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);聖国オルテニスの首都アルテガ
- !から救世主が率いる救世騎士団ていうのが出
- !軍したんだって。p;世界中の困っている人た
- !ちを助けてあげるのが目的らしいよ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);救世主、救世騎士団か…。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);なんかスゴイよね。;一軍を率いて
- !世界中の困っている人たち救うなんて。p;
- !救世主ってどんな人なんだろ。;
- !一度会ってみたいなぁ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、そうだな。;
- !(上流階級の自己満足、そんなんじゃないのか
- !)pc
- }
- &if(進行==19){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);昨日、アザム国との国境付近で
- !オルトン教の布教師の一団が殺害されていた
- !そうだ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);オルトン教の布教師って、もし
- !かしたら昨日のルシェルが言っていた…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、たぶんそうじゃないかな
- !。;昨日の彼女の慌てぶりから見ても間違い
- !ないだろう。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);狼に襲われたのかしら。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);今、聖騎士団が調査しているみ
- !たいだ。p;オルトン教の聖職者の殺害だけに
- !かなりの大事件になってるみたいだ。pc
- }
- &if(進行>19){
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);北のアザム国は、今内乱で国中
- !がとても混乱しているそうよ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);それじゃあ、宣教師が布教活動
- !なんて状態じゃないんじゃないのか。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);そうよね。;北の関所も何か変み
- !たいだし。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(ふっ、まあ関係の無いことだ
- !…。;だけど、アザムか…。;なんなんだ一体!
- !)pc
- }
- }
- &if(選択2==2){ //噂話
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);最近、アザム国へと行った者が帰って来な
- !いっていう噂があるらしい。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);行方不明?w;アザム国で何か起
- !こってるのかな。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);内乱って聞いたけど。p;まあ、
- !オレ達はアザム国へ行く予定はないから。;
- !心配しなくていいよ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);wうん…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(アザム…、なんなんだ妙に引っかかる気
- !がする)pc
- }
- &if(選択2==3){ //その他
- &if(進行==18){
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);この町に犬がいっぱい居るのは
- !、オルトン教でイヌが神聖な動物とされてい
- !るからなんだって。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);へえ、そうなのか。w;だけど、
- !町中に犬のフンが…。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);犬、嫌いじゃないけど。;ちょ、
- !wちょっとヒドイよね…。pc
- }
- &if(進行>=19){
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);救世主って、すごく若い人なん
- !だって、しかも兄と妹の双子だそうよ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);双子のメシアか。;そういえば、
- !齢70を越えた聖女なんとかっていうばあさ
- !んが神より授かったとか言っていたな。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);ほんと神秘的よねぇ。;でも、7
- !0近いおばあさんていうのもスゴイなぁ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);本当かどうかはわからないけど
- !な。pc
- }
- }
- &if(選択2==4){ //目的
- &jsr 目的
- }
- &if(選択2<0){&jmp メニュー3}
- &jmp 情報3
- }
- &if(選択1==2){
- &monsprint 64,24,MAP3
- !o(1):b(0) ◆セフラ周辺地図◆b(5)pc
- &jmp メニュー3
- }
- &if(選択1==3){
- &if(進行==18){
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);もうすぐ夜だよ。;街道沿いでも、夜に外を
- !歩くのは危ないよ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、わかってるよ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);(でも、逸る気持ちわかるよ…)pc
- }&else{
- 町中=0
- &goto2 FIELD,@6,2
- }
- }
- &if(選択1==5){
- &label
- %selectlist={セーブ,ロード,ゲーム終了}
- 選択2=%select
- &if(選択2==0){
- 町中=0
- %partynamedef(0) = セフラ
- &save 50
- &jmp @b
- }
- &if(選択2==1){
- 町中=0
- &load 1
- &jmp @b
- }
- &if(選択2==2){
- !o(1)b(5);ゲームを終了しますか?p
- &if(%inkeyn==0){
- !o(1)b(5);本当に終了してもよろしいですか?p
- &if(%inkeyn==0){
- !o(1)b(5);それでは終了します…。pc
- &end
- }
- }
- !c
- &if(選択2<0){&jmp メニュー3}
- &jmp @b
- }
- }
- &jmp メニュー3
-
-
- //━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
- [MATI4]//アルテガ
- &sppsp CHR\MATI.SPP //SPP(人/スプライト)ファイルを設定
- &if(町中==0){&bgm 13}
- &map MAP\MATI4.MAP //マップの設定
- &mapsp MAP\MATI4.SP //BGの設定
- &mappal MAP\MATI4.PAL //BGパレットの設定
- %partypoint={0,0,2}
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1) ={$9, 0,$C1, 2, -1} //カリス
- %mandef(2) ={$A, 0,$C2, 2, -1} //リアナ
- %mandef(3) ={$B, 0,$C3, 2, -1} //
- %mandef(4) ={$E, 0,$C4, 2, -1} //
- %mandef(5) ={$E, 0,$C5, 2, -1} //
- %mandef(6) ={$B, 0,$C6, 2, -1} //
- %mandef(7) ={$B, 0,$C7, 2, -1} //
- %mandef(8) ={$B, 0,$C8, 2, -1} //
- %mandef(9) ={$A, 0,$C9, 2, -1} //
- %mandef(10)={$C, 0,$CA, 2, -1} //
- %mandef(11)={$C, 0,$CB, 2, -1} //
- %mandef(12)={$D, 0,$CC, 2, -1} //
- %mandef(13)={$9, 0,$CD, 2, -1} //
- %mandef(14)={$E, 0,$CE, 2, -1} //
- %mandef(15)={$C, 0,$CF, 2, -1} //
- %mandef(16)={$C, 0,$E0, 2, -1} //
- %mandef(17)={$B, 0,$E1, 2, -1} //
-
-
- &on
- &if(進行==20){
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);ここがアルテガ…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);聖都市か。w;確かにそんな雰囲気はあるな。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);でも、なんだか町、wというか町の人達に活気が無
- !いように見えるわ…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、確かにな。w;まあいいさ、それよりも早く
- !図書館へ向かおう。pc
- 進行=21
- }
- &if(進行==22){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);入館許可証も手に入れたし。;さ、図書館へ向かお
- !う。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);うん、やっと図書館に入れるね。pc
- 進行=23
- }
-
- &label メニュー4
- %selectlist={移動,情報収集,地図,町を出る, ,システム}
- 選択1=%select
- &if(選択1<0 or 選択1==4){&jmp @b}
- &if(選択1==0){
- &if(進行==24){&goto IV15}
- &label
- %selectlist={宿屋,雑貨屋,獣屋,図書館, ,町の外}
- 選択2=%select
- &if(選択2<0){&jmp メニュー4}
- &if(選択2==4){&jmp @b}
- &if(選択2==0){&goto YADO}
- &if(選択2==1){&goto MISE1}
- &if(選択2==2){&goto MISE2}
- &if(選択2==3){
- &if(進行==21){&goto IV10}
- &if(進行==23){&goto IV14}
- }
- &if(選択2==5){
- 町中=0
- &goto2 FIELD,102,58,2
- }
- }
- &if(選択1==1){
- &if(進行==24){&goto IV15}
- &label 情報4
- %selectlist={町について,出来事,噂話,その他,目的}
- 選択2=%select
-
- &if(選択2==0){ //町について
- &if(進行==21){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);聖都市アルテガ。;もとはオルト
- !ン教の教祖オルトンが生まれたっていう小さ
- !な村だったらしい。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);そんな村がこんな大きい都市に
- !なって、さらに国になっちゃうんだもん。;
- !スゴイね。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);信仰っていうのはある意味凄い
- !力だと思うよ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);(みんな、何かにすがらないと
- !生きて行けないのね。w;人に、神にか…)
- !pc
- }
- &if(進行==23){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);この町、ちょっと中心を外れる
- !とスラム街が広がっているようだ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);スラム街って?pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ん、貧しい人たちが住んでいる
- !地区だよ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);…ここはこんなにキレイな町並
- !みなのに…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);富める者が居れば、必ず貧しい
- !者がいる…。pc
- }
- }
- &if(選択2==1){ //出来事
- &if(進行==21){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);なんとかいう伯爵の令嬢が魔女
- !の疑いで捕らわれたそうだ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);魔女…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);リアナ。;ここでは絶対に魔法は
- !使うなよ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);…うん、わかってる。pc
- }
- &if(進行==23){
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);2人の救世主が率いる救世騎士
- !団がどこかの森の魔物退治に出かけてるんだ
- !って。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);魔物が地上に出てきてるのか。p
- !c
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);そうよね。;魔物っていったら、
- !暗い洞窟やなんかにしか居ないはずなのにね。
- !pc
- }
- }
- &if(選択2==2){ //噂話
- &if(進行==21){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);最近アルテガじゃあ、魔女裁判
- !がひっきり無しにおこなわれているせいで。
- !p;そのうち魔女が連合を組んで攻めてくるん
- !じゃないかって言われているそうだ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);魔女裁判。;そんなに魔女ってい
- !っぱいいるの。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);本物は極一部だけだろう。;それ
- !にこういう状態じゃあ。本物はここには寄り
- !付かないよ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);じゃあ…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…ああ、ほとんどは無実なんだ
- !ろうな。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);ひ、ひどいよ、そんなの…。;こ
- !の町のみんなは黙っているの!pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);騒ぎ立てれば異端と言われ、捕
- !まってしまうのさ。p;オレも酷いと思うけど
- !、教会の体制が変わらない限りどうにもなら
- !ないよ…。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);そんな…。p
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);(人ってこんなに無力なの…)pc
- }
- &if(進行==23){
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);オルトン教徒の間じゃ、もうす
- !ぐこの世界が破滅するそうよ。p;でも救世主
- !がオルトン教の理想の新世界へと導いてくれ
- !るって言われてるみたい…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);世界の破滅?w;新世界?p;ずい
- !ぶんととんでいる話しだな。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);でも、オルトン教は世界中で信
- !仰されているし、長い歴史があるみたいだし
- !…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);でも長いからこそ、最初の教え
- !っていうのは、その時々の支配者によって色
- !々と解釈を変えられていってるんじゃないか
- !な。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);そうよね。;突然、世界が無くな
- !っちゃうなんて絶対にイヤだし。;そんなの
- !信じたくない!pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);リアナ、あんまり大きな声でそ
- !んなこというと…。;誰が聞いているかわか
- !らないぞ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);wそ、wそうね。;つかまっちゃう
- !かもしれないもんね。pc
- }
- }
- &if(選択2==3){ //その他
- &if(進行==21){
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);聖都市っていうだけあって、と
- !ってもキレイな町並みだけど、なにか違う気
- !がするな。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);神々しさってやつじゃないのか。
- !pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);なんて言うんだろ。p;寂しいと
- !いうか哀しいっていうか、町の人たちからも
- !そんな感じがするなぁ。pc
- }
- &if(進行==23){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);オルトン教徒の生活っていうの
- !はかなり厳しく制限されているみたいだ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);毎日何度もお祈りしたり、食事
- !も色々と制限があるみたい。p;あたしはそん
- !な生活は絶対にイヤだなぁ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、オレもごめんだね。pc
- }
- }
- &if(選択2==4){ //目的
- &jsr 目的
- }
- &if(選択2<0){&jmp メニュー4}
- &jmp 情報4
- }
- &if(選択1==2){
- &monsprint 64,24,MAP4
- !o(1):b(0) ◆アルテガ周辺地図◆b(5)pc
- &jmp メニュー4
- }
- &if(選択1==3){
- 町中=0
- &if(進行==24){&goto IV15}
- &goto2 FIELD,102,58,2
- }
- &if(選択1==5){
- &label
- %selectlist={セーブ,ロード,ゲーム終了}
- 選択2=%select
- &if(選択2==0){
- 町中=0
- %partynamedef(0) = アルテガ
- &save 50
- &jmp @b
- }
- &if(選択2==1){
- 町中=0
- &load 1
- &jmp @b
- }
- &if(選択2==2){
- !o(1)b(5);ゲームを終了しますか?p
- &if(%inkeyn==0){
- !o(1)b(5);本当に終了してもよろしいですか?p
- &if(%inkeyn==0){
- !o(1)b(5);それでは終了します…。pc
- &end
- }
- }
- !c
- &if(選択2<0){&jmp メニュー4}
- &jmp @b
- }
- }
- &jmp メニュー4
-
- //リアテリマ
- //━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
- [MATI5]//ティット
- &sppsp CHR\MATI.SPP //SPP(人/スプライト)ファイルを設定
- &if(町中==0){&bgm 13}
- &map MAP\MATI5.MAP //マップの設定
- &mapsp MAP\MATI5.SP //BGの設定
- &mappal MAP\MATI5.PAL //BGパレットの設定
- %partypoint={0,0,2}
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- &if(進行>=30){
- %manpoint(1)={100,100}
- %mandef(2)={$9 , 0,$E3, 2, -1} //カリス
- %manpoint(2)={16,8}
- &if(%partyexist(4)!=0){
- %mandef(3)={$B , 0,$E6, 2, -1} //ルシェル
- %manpoint(3)={17,12}
- }&else{
- %manpoint(3)={100,100}
- }
- }&else{
- %mandef(1)={$A , 0,$E4, 2, -1} //リアナ
- %manpoint(1)={17,12}
- %mandef(2)={$9 , 0,$E2, 2, -1} //カリス
- %mandef(3)={$B , 0,$E5, 2, -1} //ルシェル
- }
- &if(%partyexist(5)!=0){
- %mandef(4)={$C , 0,$E7, 2, -1} //アゼル
- }
- &if(%partyexist(6)!=0){
- %mandef(5)={$C , 0,$E8, 2, -1} //ダリア
- }
- %mandef(6)={$7 , 0,$E9, 2, -1} //荷車
- %mandef(7)={$7 , 0,$EA, 2, -1} //荷車
- %mandef(8)={$7 , 0,$EB, 2, -1} //荷車
- %mandef(9)={$7 , 0,$EC, 2, -1} //荷車
- %mandef(10)={$9, 0,$ED, 2, -1} //荷車引く人
- %mandef(11)={$9, 0,$EE, 2, -1} //荷車引く人
- %mandef(12)={$A, 0,$EF, 2, -1} //
- %mandef(13)={$B, 1,$00, 2, -1} //
- %mandef(14)={$F, 1,$01, 2, -1} //
- %mandef(15)={$C, 1,$02, 2, -1} //
- %mandef(16)={$D, 1,$03, 2, -1} //
- %mandef(17)={$A, 1,$04, 2, -1} //
- %mandef(18)={$F, 1,$05, 2, -1} //
- %mandef(19)={$F, 1,$06, 2, -1} //
- %mandef(20)={$B, 1,$07, 2, -1} //
- %mandef(21)={$C, 1,$08, 2, -1} //
- %mandef(22)={$A, 1,$09, 2, -1} //
- %mandef(23)={$B, 1,$0A, 2, -1} //
- %mandef(24)={$E, 1,$0B, 2, -1} //
- %mandef(25)={$9, 1,$0C, 2, -1} //
- %mandef(26)={$D, 1,$0D, 2, -1} //
- %mandef(27)={$B, 1,$0E, 2, -1} //
- %mandef(28)={$C, 1,$0F, 2, -1} //
- %mandef(29)={$F, 1,$20, 2, -1} //
-
-
- &on
-
- &if(進行==28){
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);アルダムさんが紹介してくれたお医者様は、確
- !かオスカーさんという方でしたよね。pc
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);ああそうだ、早くその医者を探そう。pc
- 進行=29
- }
- &if(進行==30){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);アンヌ森林はこの町を西に行った場所だ。w;急い
- !で薬草を取ってこなければ…。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);ええ、でも幾らかの準備は必要ですよね。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、魔物が出てくるだろうからな。w;ルシェル
- !、無理に付いてこなくてもいいんだぜ。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);大丈夫です。;行きます。p
- !o(1)j(2)ルシェルj(0);(それと、メシア様たちはご無事なのかしら)pc
- %partydef(1) = {$9,0,$20,0,-1,0,-1,-1,-1,-1}
- 進行=31
- }
- &if(進行==33){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);診療所へ急ごう。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);はい。w;そうだ、メシア様も診てもらったほう
- !がいいです。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);ああ、そうね。w;ルシェルのおかげでだいぶ楽に
- !なったけど、正直ちょっと辛いわ。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);右に同じだ。w;オレたちもその名医に診てもらお
- !う。pc
- 進行=34
- &goto CLINIC
- }
- &if(魔法国へ==1){
- &if(進行>=42 and 進行<46){
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);どうだった。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);リアナはもう退院してた…。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);そう、合えなくて残念だったわね。p;
- !でも、元気になったってことでしょ。;また直ぐ会えるわ。p;
- !あれ、でも東大陸に向かったら、そう直ぐには会えないわね。p;
- !あ、ごめん全然フォローになってないわ…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ありがとう、ダリア。p;そうだよな、元気になっ
- !てくれたってことだし、いつかはまた会える。pc
- }
- &if(進行==46){
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);どうだった。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);リアナはもう退院してた…。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);そう、合えなくて残念だったわね。p;
- !でも、元気になったってことでしょ。;また直ぐ会えるわ。p;
- !あれ、でも東大陸に向かったら、そう直ぐには会えないわねp;
- !あ、ごめん全然フォローになってないわ…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ありがとう、ダリア。p;そうだよな、元気になっ
- !てくれったってことだし、いつかはまた会える。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);そうさ、カリス。;まずは東大陸だ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ…。pc
- }
- 魔法国へ=2
- }
-
- &label メニュー5
- %selectlist={移動,情報収集,地図,町を出る, ,システム}
- 選択1=%select
- &if(選択1<0 or 選択1==4){&jmp @b}
- &if(選択1==0){
- &label
- %selectlist={宿屋,雑貨屋,獣屋,診療所, ,町の外}
- 選択2=%select
- &if(選択2<0){&jmp メニュー5}
- &if(選択2==4){&jmp @b}
- &if(選択2==0){
- &if(進行==29){
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);(診療所へ向かわなければ)p
- !c
- &jmp @b
- }
- &goto YADO
- }
- &if(選択2==1){
- &if(進行==29){
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);(診療所へ向かわなければ)p
- !c
- &jmp @b
- }
- &goto MISE1
- }
- &if(選択2==2){
- &if(進行==29){
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);(診療所へ向かわなければ)p
- !c
- &jmp @b
- }
- &goto MISE2
- }
- &if(選択2==3){
- &if(魔法国へ>=1){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(もうリアナは退院してるから
- !、寄る必要はないな)pc
- &jmp @b
- }
- &if(進行==29){&goto IV19}
- &if(進行==33){&goto CLINIC}
- &if(進行>=30 and 進行<=32){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);アンヌ森林はこの町を西に行っ
- !た場所だ。w;急いで薬草を取ってこなければ…。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);ええ、早くリアナさんを楽に
- !してあげましょう。pc
- &jmp @b
- }
- &if(進行>=34 and 進行<=41){
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);カリス、やっぱり彼女のことが
- !気になる。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…いや、そんなんじゃないよ。w;
- !さあ、行こう。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);あら、強がっちゃって。pc
- &jmp @b
- }
- &if(進行>=42 and 進行<46){
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);カリス、やっぱり彼女のことが
- !気になる。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);いや…。ww;すまない、少しだけ
- !様子を見てきていいかな。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);フフ、いいわよ。p;私はここで
- !待ってるからいってらっしゃい。pc
- &goto CLINIC
- }
- &if(進行==46){
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);カリス、やっぱり彼女のことが
- !気になる。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);いや…。ww;すまない、少しだけ
- !様子を見てきていいかな。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);フフ、いいわよ。p;私たちはここで
- !待ってるからいってらっしゃい。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);ああ、邪魔者はおとなしくしてるよ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);からかうなよ…。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);ハハ、すまない。pc
- &goto CLINIC
- }
- }
- &if(選択2==5){
- &if(進行==29){
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);(診療所へ向かわなければ)p
- !c
- &jmp @b
- }
- 町中=0
- &goto2 FIELD,@9,2
- }
- }
- &if(選択1==1){
- &if(進行==29){
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);(診療所へ向かわなければ)p
- !c
- &jmp メニュー5
- }
- &label 情報5
- %selectlist={町について,出来事,噂話,その他,目的}
- 選択2=%select
-
- &if(選択2==0){ //町について
- &if(進行==31){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ここは元々がオアシスにあった
- !集落が発展して今の町になったそうだ。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);どうして、こうお医者さんや
- !学者さんが多いんでしょうね。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);医者が多いのはやっぱり、薬草
- !が豊富にあるアンヌ森林が近くにあるからだ
- !ろう。p;学者が多いのはこの国自体が自由な
- !思想を許しているからじゃないのかな。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);自由な思想ですかぁ。p
- !o(1)j(2)ルシェルj(0);(神を否定することも許され
- !る…)pc
- }
- &if(進行>31 and 進行<42){
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);この砂漠の国は学問の国という
- !以外にも、もう一つの特徴を持っている。p;
- !この砂漠には様々な鉱石や地下燃料が多く埋
- !まっているんだ。p;それを他国へ輸出してい
- !るんだ。;まあ知識もそうと言えるけどね。p
- !c
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);そうね。;この国は世界一裕福な
- !国って言ってもいいんじゃないかしら。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);(オルテニスも寄付と称して金
- !を集めてるが、その殆どを教会のため、上層
- !の私服を肥やすために運用している。p;民は
- !飢えているというのに…)pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);でも、そんな旨い国を他の国が
- !放っておくのか。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);そりゃ、放っておかないわ。p;
- !だから、その豊富な資金でこの国の軍隊は強
- !力なものよ。;いくら知に優れているという
- !だけじゃ、国は護れないもの。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);知・金・武かぁ…。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);一つの理想的な国だね。p;まあ
- !、良いことだけとは言えないけど。pc
- }
- &if(進行>=42 and 進行<46){
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);この町の湖には港があるけど、
- !海への出口には橋が架かってたでしょ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、船が下を潜れる高さじゃ
- !なかったけど。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);あれはねぇ。;船が通る度に橋が
- !真ん中で分かれるようになってるのよ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);なるほどねぇ。;流石に知の国だ
- !そんな物を考えるなんて。pc
- }
- &if(進行==46){
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);カリス、知ってるかい。;この先
- !にある橋は船が…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…通る度に二つに分かれるんだ
- !ろ。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);へ?w;なあんだ知ってたのかつ
- !まんないなあ。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);フフフ。pc
- }
- }
- &if(選択2==1){ //出来事
- &if(進行==31){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);とにかく、アンヌ森林に魔物が
- !現れ出したってのが大事件みたいだ。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);討伐に向かったメシア様たち
- !は御無事なのでしょうか。p;もしものことが
- !あれば、私たちオルトン教徒たちにとって大
- !事件になってしまいます…。pc
- }
- &if(進行>31 and 進行<42){
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);砂漠に霧かぁ…。w;奇妙な話し
- !だな。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);早く、解決しなくてはね。p;テ
- !ィットとリーナスを結ぶ道が断たれたんじゃ
- !、かなりの打撃でしょうから。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);海路を使ったんじゃコストが掛
- !かるだろうからな。w;陸路の回復は必至って
- !わけか。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);ああ、急ごう。pc
- }
- &if(進行>=42 and 進行<46){
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);アンヌ森林も、もう元の平和な
- !森に戻ったそうよ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);陸路も回復したしな…。;この国
- !も一安心というわけか。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);そうね…。p
- !o(1)j(2)ダリアj(0);(でも、またこれで教会は莫大
- !な寄付を手に入れたということだわ)pc
- }
- &if(進行==46){
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);どうやら、アンヌ森林にまだ魔
- !物の生き残りがいたらしい。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);学者が襲われたって。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);人が入り込んでいけば、じきに
- !居なくなってしまうから心配ないとは思うけ
- !ど…。p;魔物の死体も学者さんにとっては、
- !良い研究材料なのね。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);(部下達の亡骸は教会が引き取
- !りに来ていたが、魔物の方は放っておいた
- !のか)pc
- }
- }
- &if(選択2==2){ //噂話
- &if(進行==31){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);アンヌ森林に向かったメシア率
- !いる救世騎士団は全滅したんじゃないかって。
- !pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);そんな、wそんなこと絶対にあ
- !りません!p;メシア様がそんな魔物ごときに
- !やられるわけがありません!pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);だが出兵して、もう10日も経
- !っているそうじゃないか。p;現実的に考えて
- !無事だとは思えない。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);いいえ、メシア様は大丈夫で
- !す。;お2人には神の強い御加護があるので
- !すから。pc
- }
- &if(進行>31 and 進行<42){
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);例の砂漠の霧だけど。;最近、あ
- !の辺りで黒い竜を見たって言う噂があるみた
- !い。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);竜…。p
- !o(1)j(2)カリスj(0);(黒い竜…。;魔竜…)pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);竜。;太古の生物がまだ存在して
- !いるのか。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);まあ、噂だけど。;でも、竜とか
- !だったらこういう異常な現象も作れそうじゃ
- !ない。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);確かに、だけど…。p
- !o(1)j(2)アゼルj(0);(竜か、まさか魔竜、ヤツじゃ
- !…)p
- !o(1)j(2)アゼルj(0);とにかく、急いで解決しよう。p
- !c
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);ええ、また変な噂がたたない内
- !に真実を解き明かしましょう。pc
- }
- &if(進行>=42 and 進行<46){
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);例の砂漠を飛んでいた竜の噂。p;
- !おそらくアバロニクスの仕業ね。p;
- !一体、ヤツは何が目的なのかしら。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);魔竜アバロニクスか…。pc
- }
- &if(進行==46){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);もう、特に情報はないみたいだ
- !な。pc
- }
- }
- &if(選択2==3){ //その他
- &if(進行==31){
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);…私も、魔女と言われても仕
- !方がないかもしれません。p;私が使う回復魔
- !法はあるシスターに教えてもらったのです。
- !p;普通なら何年も掛かるものなのに、私は1
- !週間でマスターしてしまったのです。p;でも
- !回復魔法程度は教会でも多少は許されている
- !ものの魔法は魔法です。p;夢中で習得したの
- !に、とても恐くて…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);…そんな私を見て、そのシス
- !ターが言ってくれたのです。p;「あなたは特
- !別な力を授かったのよ。;神に選ばれしその力、
- !人々のため役立てなさい。」と。p;その時は目の
- !前がパッーと開けた気がしました。;この力を
- !皆の役に立てようと…。p;だけど、それから
- !しばらくしてシスターは魔女として捕らえら
- !れたのです。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…そうか。ww;そう言えばリアナ
- !も、リアナもそんなこと言ってたな。;自分の
- !力を人の役に立てたいと。p;リアナは君の命
- !をその力で救った。;そして君もリアナの命を
- !救った。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);この力、教会からは異端とさ
- !れても、尊い人の命を救える素晴らしい力な
- !のでしょうか…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);魔法ってのは人の生み出したも
- !の。;結局は使う者の心次第だろう。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);私の心…。p
- !o(1)j(2)ルシェルj(0);(正しく清らかな心でこの力
- !を使っていきたい…)pc
- }
- &if(進行>31 and 進行<42){
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);南に広がっている砂漠は、大昔
- !は豊かな土地で巨大な王国が存在していたそ
- !うだ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);じゃあ、今みたいな砂漠になっ
- !たのは…。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);何かの本で読んだ覚えがあるん
- !だけど。p;確か魔法による爆発かなにかで国
- !全部が吹き飛んで、その影響で土地も砂漠化
- !してしまったって。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);聖書か?w;それとも何とか言う
- !お伽話だったか?p;どっちにしろ魔法にそ
- !んな大きな力があるのか。p;おそらく大きな
- !戦争、疫病、洪水や地震なんかでだろう。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);お伽話。;詩人ギルモニークの書
- !いた英雄伝か…。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);そう、たしかその本よ。;聖書じ
- !ゃこのことについては触れられてないわ。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);どっちにしろ、そんな場所も今
- !は砂の海だよ。;真実は語ってくれない。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、早くその砂漠へ、南へ向か
- !おう。pc
- }
- &if(進行>=42 and 進行<46){
- 不安++
- &if(不安>4){不安=4}
- &jsr その他
- }
- &if(進行==46){
- &jsr その他
- }
- }
-
- &if(選択2==4){ //目的
- &jsr 目的
- }
-
- &if(選択2<0){&jmp メニュー5}
- &jmp 情報5
- }
- &if(選択1==2){
- &monsprint 64,24,MAP5
- !o(1):b(0) ◆ティット周辺地図◆b(5)pc
- &jmp メニュー5
- }
- &if(選択1==3){
- &if(進行==29){
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);(診療所へ向かわなければ)p
- !c
- &jmp メニュー5
- }
- 町中=0
- &goto2 FIELD,@9,2
- }
- &if(選択1==5){
- &label
- %selectlist={セーブ,ロード,ゲーム終了}
- 選択2=%select
- &if(選択2==0){
- 町中=0
- %partynamedef(0) = ティット
- &save 50
- &jmp @b
- }
- &if(選択2==1){
- 町中=0
- &load 1
- &jmp @b
- }
- &if(選択2==2){
- !o(1)b(5);ゲームを終了しますか?p
- &if(%inkeyn==0){
- !o(1)b(5);本当に終了してもよろしいですか?p
- &if(%inkeyn==0){
- !o(1)b(5);それでは終了します…。pc
- &end
- }
- }
- !c
- &if(選択2<0){&jmp メニュー5}
- &jmp @b
- }
- }
- &jmp メニュー5
-
- //━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
- [MATI6]//リーナス
- &sppsp CHR\MATI.SPP //SPP(人/スプライト)ファイルを設定
- &if(町中==0){&bgm 13}
- &map MAP\MATI6.MAP //マップの設定
- &mapsp MAP\MATI6.SP //BGの設定
- &mappal MAP\MATI6.PAL //BGパレットの設定
- %partypoint={0,0,2}
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1)={$9 , 1,$21, 2, -1} //カリス
- //アゼル表示
- &if(進行<=41 or 進行>=45){
- %mandef(2)={$C , 1,$22, 2, -1} //アゼル
- }
- %mandef(3)={$C , 1,$23, 2, -1} //ダリア
- %mandef(4)={$D , 1,$24, 2, -1} //詩人
- %mandef(5)={$8 , 1,$25, 2, -1} //町人
- %mandef(6)={$7 , 1,$26, 2, -1} //町人
- %mandef(7)={$7 , 1,$27, 2, -1} //町人
- %mandef(8)={$6 , 1,$28, 2, -1} //町人
- %mandef(9)={$F , 1,$29, 2, -1} //町人
- %mandef(10)={$B, 1,$2A, 2, -1} //町人
- %mandef(11)={$A, 1,$2B, 2, -1} //町人
- %mandef(12)={$6, 1,$2C, 2, -1} //町人
- %mandef(13)={$6, 1,$2D, 2, -1} //町人
- %mandef(14)={$F, 1,$2E, 2, -1} //町人
- %mandef(15)={$6, 1,$2F, 2, -1} //町人
- %mandef(16)={$6, 1,$40, 2, -1} //町人
- %mandef(17)={$8, 1,$41, 2, -1} //町人
- %mandef(18)={$C, 1,$42, 2, -1} //町人
- %mandef(19)={$B, 1,$43, 2, -1} //町人
- %mandef(20)={$F, 1,$44, 2, -1} //町人
- %mandef(21)={$7, 1,$45, 2, -1} //町人
- %mandef(22)={$6, 1,$46, 2, -1} //町人
- %mandef(23)={$D, 1,$47, 2, -1} //町人
-
- &on
- &if(進行==38){
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);さあ。;一旦、宿に着こう。;そこで色々と話すよ。
- !pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ…、wわかった。pc
- 進行=39
- &goto IV21
- }
- &if(進行==41){
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);さて。;船の準備があるから、あと2、3日はここ
- !で足止めだ。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);その間に私たちも教会への報告を済ませなくては
- !ね。p;だから、カリスは自由にしていていいわよ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ…。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);(カリス、不安なのか)p
- !o(1)j(2)アゼルj(0);…。w;カリス一人でも退屈だろう。;ダリア、こっ
- !ちはオレがやるから、カリスに付いててやれよ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);別に…。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);…そうね。;面倒なことは兄貴にまかせて、少し気
- !張らしでもしてようかしら。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);ああ、そうしてくれよ。w;準備が整ったら、僕か
- !ら声を掛けるよ。pc
- 進行=42
- 確変=1200
- &partyout 5
- }
- &if(進行==45){
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);カリス、ダリア。;やっと船の準備が出来たよ。p;
- !いつでも出発できるから、こっちの準備が整ったら港に行こう。
- !pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);わかった。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);あ~あ、デートはおしまいかぁ。w;ま、楽しかっ
- !たわよね。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);へえぇ、そうなのか。;ダリア、後で教えてくれよ
- !な。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);だーめ。w;カリスと私の2人だけの秘密だもの。p
- !c
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);カリス、wそうか、wそうなのか。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);お、wお前ら、いい加減にしろよ!pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);ハハハ、wカリスは直ぐムキになるからからかい甲
- !斐があるな。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);あら、可愛いじゃないの。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);世間がどう言おうとオレは金輪際、あんたらが救
- !世主だなんて絶対思わないぞ!pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);あーあ、怒らせちゃったわ。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);悪い悪い。w;調子に乗りすぎたよ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…はっ、wアゼルこそ、一人になって色々と羽目を
- !外してたんじゃないのか。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);な、w何を言うんだ!pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);あー、w兄貴、wそうなんだぁ!pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);ち、w違うよ!p
- !o(1)j(2)アゼルj(0);(カリス、けっこう元気になったみたいだな)p
- !c
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);その慌てぶり、怪しいなぁ。p
- !o(1)j(2)アゼルj(0);(カリス、私たちに心配掛けまいとしてるのね。w
- !;本当はとっても不安なのに…)pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ハハハハハ…。p
- !o(1)j(2)カリスj(0);(彼らが救世主か、確かにそうなのかもな)pc
- 進行=46
- 不安=4
- &partyin 5
- }
-
- &label メニュー6
- %selectlist={移動,情報収集,地図,町を出る, ,システム}
- 選択1=%select
- &if(選択1<0 or 選択1==4){&jmp @b}
- &if(選択1==0){
- &label
- %selectlist={宿屋,雑貨屋,獣屋,港, ,町の外}
- 選択2=%select
- &if(選択2<0){&jmp メニュー6}
- &if(選択2==4){&jmp @b}
- &if(選択2==0){&goto YADO}
- &if(選択2==1){&goto MISE1}
- &if(選択2==2){&goto MISE2}
- &if(選択2==3){
- &if(進行<46){
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);船の準備が出来たら、アゼルが
- !知らせてくれるわ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、わかってる。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);(カリス、はやる気持ちはわかる
- !わ)pc
- &jmp @b
- }
- &if(進行==46){&goto IV23}
- }
- &if(選択2==5){
- 町中=0
- &goto2 FIELD,48,176,2
- }
- }
- &if(選択1==1){
- &label 情報6
- %selectlist={町について,出来事,噂話,その他,目的}
- 選択2=%select
- &if(選択2==0){ //町について
- &if(進行>=42 and 進行<46){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);学問の都リーナスか。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);ここは学問だけじゃなく、様々
- !な彫刻や絵画、詩歌といった文化の都でもあ
- !るのよ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);確かに他の町とは違う雰囲気を
- !感じる。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);そうね。;アーティスト達の感
- !性が町全体に広がっている感じだわ。pc
- }
- &if(進行==46){
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);リーナス。;この都市には各国の
- !王族や貴族の子供たちが留学によく訪れるそ
- !うだよ。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);これだけ素敵な町なら私も留学し
- !てみたいわ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);で、何を学ぶんだい。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);ん、w歌を学びたいわ。;私は昔
- !から歌劇の歌手になりたかったのよ。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);ダリア、君は小さい頃からよく
- !歌っていたもんな。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);へえ、そうなんだ。;ちょっと意
- !外だな。p;でも、ダリアだったら舞台が似合
- !うだろうな。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);フフ。;ありがと。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);久しぶりにダリアの歌を聴いて
- !みたいな。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);ええ、もちろんいいわよ。;船の
- !上で聴かせてあげるわ。p;ちょっと練習して
- !おかないとね。pc
- }
- }
- &if(選択2==1){ //出来事
- &if(進行>=42 and 進行<46){
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);砂漠の霧が消えて、人の移動も
- !活発になったみたいね。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、でもこれが元の姿なんだ
- !ろうな。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);やっぱりこう活気が溢
- !れていて、賑やかな方が町って感じだわ。p
- !o(1)j(2)ダリアj(0);(アルテガもこんな町なら…)pc
- }
- &if(進行==46){
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);この間、この町のある富豪が、
- !彼がパトロンをしていた彫刻家に殺されたそ
- !うよ。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);ああ、資金を援助しているのを
- !いいことに、その彫刻家に肉体関係を迫った
- !って。p;金で一人の人間のすべてを縛る権利
- !など無い…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);この都市に住んでいるのは、決
- !してお金持ちばかりじゃないわ。p;だから、
- !こういう金銭が絡んだ事件は多いみたいね…
- !。p;お金を多く持つことがすべてな社会。p;
- !お金があることで優越を気取っている人々。
- !;生きるためにそれにへつらう人々。p;平等
- !という理想は叶わないのかしら。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);確かに金があれば、なんでも出
- !来る世の中だけど。;人という時点では平等
- !だ。p;貧富の差は埋められないとしても、人
- !々の心は変えられるはず、オルトンの教えは
- !そう言っている。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);神の御前ではすべての命は等し
- !き光を浴びる…。;甘い幻想じゃないのかし
- !ら。p;こう私たちがやっていることさえも、
- !一部の金持ちや権力者をつけあがらせている
- !だけじゃないの。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);そうなっているのは事実だけれ
- !ど、僕等は信じなくてはいけない。;変えら
- !れることを。pc
- &wait 30
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);ふっ、wそうね。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(変えられることを信じるか…)pc
- }
- }
- &if(選択2==2){ //噂話
- &if(進行>=42 and 進行<46){
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);砂漠の霧が消えて、人の移動も
- !活発になったみたいね。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、でもこれが元の姿なんだ
- !ろうな。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);平和で危険のないように映っている。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ダリア…。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);人々は直ぐに忘れてしまうでし
- !ょうね。p;誰しも、嫌なことは忘れてしまい
- !たいでしょうけど。;そこから色々なことを学
- !び取って欲しいわ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);あっ、ごめんなさい。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);いや、気にしてないよ。p;確か
- !に人が生きていくことは辛いことも多いだろ
- !うから、オレみたいな記憶を失くした者を羨
- !むやつもいるんだろうな。p;でも、それは記
- !憶を失くした時の不安と恐怖を知らないから
- !言えることだ。p;自分が自分であることを理
- !解できること、それは幸せだよ。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);カリス、大丈夫よ。;東大陸に行
- !けばきっと手がかりが得られるわ。p;なぜ
- !かしらすごくそんな気がするわ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);メシアの予言か。;とても心強い
- !よ。pc
- }
- &if(進行==46){
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);カリス、こんな伝説を聞いたこ
- !とがあるかい。p
- !o(1)j(2)アゼルj(0);遥か昔、世界が強大な力を持っ
- !た王に統治された時代。p;その王の悪しき統
- !治から逃れるために各地で無数の暴動が起き
- !ていった。p;
- !やがてその反乱が世界各地に広まり、その王
- !も、呪われし王の国も滅ぼした。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…ああ、それならアルテガの図書
- !館である学者に聞いたよ。p;その滅びた国リ
- !ザレアを探すためオレは東大陸を目指してい
- !る。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);そう…、wそうだったな。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);その魔王を倒した主要人物…。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);双子のメシア・裏切りし王子・光
- !の神子・神の伝導師・女魔道士、詩人ギルニ
- !ーク。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);知っての通り私たちは幼い時より
- !、双子のメシアと呼ばれてきたわ。p;もちろ
- !んその伝承が有ったがゆえに私たちがメシア
- !とされたのだけれど。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);そしてだ、カリス。;君は夢の中
- !で裏切りの王子と呼ばれたと言った。p;裏切
- !りし王子、裏切りの王子、これは同意と考え
- !ていいだろう。p;魔王を倒したとされる人物
- !たちと同じ名で呼ばれる僕等が
- !現在(ここ)に存在しているということは…。
- !pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);なにかが私たちが生きている現在
- !(とき)に…w;何かが起こる。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…たとえオレ達がその英雄の生ま
- !れ変わりだとしたところで、どうしようって
- !いうんだ?p;まだ何も起きちゃいないじゃな
- !いか。;2人とも何を心配しているんだ、オレ
- !にはわからない。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);心配?;そうだなナンセンスなこ
- !とかも知れないな。p;僕等が英雄の生まれ変わ
- !りか…。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);だけど、アバロニクスの動きから
- !も、きっと何かが起ころうとしているんだわ。
- !p;それがアバロニクスによってのものかは判
- !からないけど。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);あんたたちは大きなものを見てい
- !るんだな。;世界とか世の中っていう。p;だけ
- !どオレは自分と自分の目の前を見据えるだけ
- !で手一杯だ。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);ふぅ、そうだな。;今は東大陸の
- !ことに集中すべきだな。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);リザレアの在ったという東大陸を
- !調べることによって、私たちの答えも見つか
- !るかも知れないわ。p;さあ、早く港へ向かい
- !ましょう。pc
- }
- }
- &if(選択2==3){ //その他
- &if(進行>=42 and 進行<46){
- 不安++
- &if(不安>4){不安=4}
- &jsr その他
- }
- &if(進行==46){
- &jsr その他
- }
- }
- &if(選択2==4){ //目的
- &jsr 目的
- }
- &if(選択2<0){&jmp メニュー6}
- &jmp 情報6
- }
- &if(選択1==2){
- &monsprint 64,24,MAP6
- !o(1):b(0) ◆リーナス周辺地図◆b(5)pc
- &jmp メニュー6
- }
- &if(選択1==3){
- 町中=0
- &goto2 FIELD,48,176,2
- }
- &if(選択1==5){
- &label
- %selectlist={セーブ,ロード,ゲーム終了}
- 選択2=%select
- &if(選択2==0){
- 町中=0
- %partynamedef(0) = リーナス
- &save 50
- &jmp @b
- }
- &if(選択2==1){
- 町中=0
- &load 1
- &jmp @b
- }
- &if(選択2==2){
- !o(1)b(5);ゲームを終了しますか?p
- &if(%inkeyn==0){
- !o(1)b(5);本当に終了してもよろしいですか?p
- &if(%inkeyn==0){
- !o(1)b(5);それでは終了します…。pc
- &end
- }
- }
- !c
- &if(選択2<0){&jmp メニュー6}
- &jmp @b
- }
- }
- &jmp メニュー6
-
- //━━━━━━━━━━━━━━━━━━━━━━
- [DAIE]//ダルの家
- &sppsp CHR\IV05.SPP
- &map MAP\DAIE.MAP //マップの設定
- &mapsp MAP\DAIE.SP //BGの設定
- &mappal MAP\DAIE.PAL //BGパレットの設定
- %partypoint={24,23}
-
- 町中=1
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- &if(進行<=11){
- %mandef(1)={$B , 0,$8F, 2, -1} //ダル
- %mandef(2)={$9 , 0,$8E, 2, -1} //カリス
- %mandef(3)={$B , 0,$A9, 2, -1} //マクス
- %mandef(4)={$F , 0,$AA, 2, -1} //ジョン
- }
- &if(進行>11 and 進行<42){
- %mandef(5)={$9 , 0,$AB, 2, -1} //カリス
- %mandef(6)={$B , 0,$CB, 2, -1} //ダル
- %mandef(7)={$A , 0,$ED, 2, -1} //リアナ
- }
- &on
- &if(進行<=11){
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);運良く私の家は無傷のようだ。;あまり時間は無いが
- !少し休んでいくか。pc
- &if(%inkeyn==1){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);いや、今はいいよ。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);そうか、なら急ごう。pc
- }&else{
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);そうだな。;少し休ませてもらうよ。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);そうか、それじゃ少し休憩だ。pc
- &jsr 全回復
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);さあ、急ごう!pc
- }
- }
- &if(進行>11 and 進行<42){
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);おお、よく来てくれたな。w;せっかく来たんだ。;今
- !日は泊まっていかないか。pc
- &if(%inkeyn==1){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);すまないが…。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);そうか。w;じゃあ、また近くまで来たら、
- !是非寄ってくれ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);うん、じゃあねぇ。pc
- }&else{
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、そうさせてもらうよ。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);それじゃあ、w何かうまいものでも作らん
- !とな。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);やったー;pあ、もちろんあたしも手伝
- !うからね。pc
- &jsr 全回復
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);うーん。w;昨日のシチュー美味しかった
- !ねぇ。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);気に入ってもらえて良かったよ。w;じゃあ
- !、また近くまで来たら寄ってくれよ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、必ず寄るよ。pc
- }
- }
-
- &goto MATI2
-
- //━━━━━━━━━━━━━━━━━━━━━━
- [YADO]//宿
- &sppsp CHR\MISE.SPP //SPP(人/スプライト)ファイルを設定
- &map MAP\YADO.MAP //マップの設定
- &mapsp MAP\YADO.SP //BGの設定
- &mappal MAP\YADO.PAL //BGパレットの設定
- %partypoint={16,0}
-
- 町中=1
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1) ={$9 , 0,$01, 0, -1} //カリス
- %mandef(7) ={$8 , 0,$07, 0, -1} //おかみ
- %mandef(8) ={$7 , 0,$08, 0, -1} //バーテン
- %mandef(9) ={$7 , 0,$09, 0, -1} //ウェイトレス
- %mandef(10)={$8 , 0,$0A, 0, -1} //客カウンター客
- %mandef(11)={$B , 0,$0B, 0, -1} //ふとっちょ夫
- %mandef(12)={$9 , 0,$0C, 0, -1} //ふっとちょ妻
- %mandef(13)={$6 , 0,$0D, 0, -1} //旅人
- %mandef(14)={$E , 0,$0E, 0, -1} //じいさん
- %mandef(15)={$7 , 0,$0F, 0, -1} //子供
-
- &if(%partyexist(2)!=0){
- %mandef(2) ={$A , 0,$02, 0, -1} //リアナ
- }
- &if(%partyexist(3)!=0){
- %mandef(3) ={$B , 0,$03, 0, -1} //ダル
- }
- &if(%partyexist(4)!=0){
- %mandef(4) ={$B , 0,$04, 0, -1} //ルシェル
- }
- &if(%partyexist(5)!=0){
- %mandef(5) ={$C , 0,$05, 0, -1} //アゼル
- }
- &if(%partyexist(6)!=0){
- %mandef(6) ={$C , 0,$06, 0, -1} //ダリア
- }
-
- &ldef 宿代
- &if(町==1){宿代=80}
- &if(町==2){宿代=70}
- &if(町==3){宿代=120}
- &if(町==4){宿代=200}
- &if(町==5){宿代=150}
- &if(町==6){宿代=160}
-
-
- &if(進行==40){
- &on
- &bgm 13
- !o(1);HP・MPを完全に回復した!!pc
- !o(1)j(2)店主;j(0)お目覚めかい。;じゃ、またねぇ。pc
- 進行=41
- &goto MATI6
- }
-
- &on
- !o(1)j(2)店主;j(0)いらっしゃい。pc
- &if(進行==6){//休憩
- !o(1)j(2)店主;j(0)ん、休憩かい。w;休憩ならf(%partynumber)人で一時間
- !f(宿代/3*%partynumber)Gだよ。;休んでいくかい?gp
- &if(%inkeyn==1){
- !o(1)j(2)店主;j(0)そうかい。;無理するんじゃないよ。pc
- }&else{
- &if(%gold>=宿代/2*%partynumber){
- %gold=%gold-宿代/2*%partynumber
- !o(1)gj(2)店主;j(0)そうかい。;じゃ、w休んでいきな。pc
- &jsr 全回復
- !o(1)j(2)店主;j(0)疲れはとれたかい。;じゃ、またねぇ。pc
- }&else{
- !o(1)gj(2)店主;j(0)悪いが、お金が無いんじゃねぇ。pc
- }
- }
- }&else{
- !o(1)gj(2)店主;j(0)f(%partynumber)人で一泊f(宿代*%partynumber)Gだよ。;泊
- !まっていくかい?gp
- &if(%inkeyn==1){
- !o(1)j(2)店主;j(0)そうかい。;無理するんじゃないよ。pc
- }&else{
- &if(%gold>=宿代*%partynumber){
- %gold=%gold-宿代*%partynumber
- !o(1)gj(2)店主;j(0)そうかい。;じゃ、wゆっくり休みな。pc
- &jsr 全回復
- !o(1)j(2)店主;j(0)お目覚めかい。;じゃ、またねぇ。pc
- &if(進行==3){進行=4}
- &if(進行==18){進行=19}
- &if(進行>=42 and 進行<45){進行++}
- }&else{
- !o(1)gj(2)店主;j(0)悪いが、お金が無いんじゃ泊められないね
- !ぇ。pc
- }
- }
- }
-
- &if(町==1){&goto MATI1}
- &if(町==2){&goto MATI2}
- &if(町==3){&goto MATI3}
- &if(町==4){&goto MATI4}
- &if(町==5){&goto MATI5}
- &if(町==6){&goto MATI6}
-
- //━━━━━━━━━━━━━━━━━━━━━━
- [MISE1]//雑貨屋
- &sppsp CHR\MISE.SPP //SPP(人/スプライト)ファイルを設定
- &map MAP\MISE1.MAP //マップの設定
- &mapsp MAP\MISE1.SP //BGの設定
- &mappal MAP\MISE1.PAL //BGパレットの設定
- %partypoint={21,28}
- 町中=1
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1) ={$9 , 0,$2D, 0, -1} //カリス
- %mandef(7) ={$9 , 0,$43, 0, -1} //店主
- %mandef(8) ={$C , 0,$44, 0, -1} //子供
- %mandef(9) ={$8 , 0,$45, 0, -1} //戦士
- %mandef(10)={$A , 0,$46, 0, -1} //主婦
- %mandef(11)={$E , 0,$47, 0, -1} //女戦士
- %mandef(12)={$8 , 0,$48, 0, -1} //老人
-
- %mandef(13)={$2 , 0,$20, 0, -1} //衣装掛け
- %mandef(14)={$2 , 0,$20, 0, -1} //衣装掛け
- %mandef(15)={$2 , 0,$20, 0, -1} //衣装掛け
- %mandef(16)={$2 , 0,$20, 0, -1} //衣装掛け
- %mandef(17)={$2 , 0,$20, 0, -1} //衣装掛け
- %mandef(18)={$2 , 0,$20, 0, -1} //衣装掛け
- %mandef(19)={$6 , 0,$21, 0, -1} //武器
- %mandef(20)={$6 , 0,$22, 0, -1} //武器
- %mandef(21)={$6 , 0,$23, 0, -1} //武器
- %mandef(22)={$6 , 0,$24, 0, -1} //武器
- %mandef(23)={$7 , 0,$25, 0, -1} //棚A
- %mandef(24)={$6 , 0,$26, 0, -1} //棚A
- %mandef(25)={$6 , 0,$27, 0, -1} //棚A
- %mandef(26)={$6 , 0,$28, 0, -1} //棚A
- %mandef(27)={$6 , 0,$29, 0, -1} //棚B
- %mandef(28)={$7 , 0,$2A, 0, -1} //棚B
- %mandef(29)={$7 , 0,$2B, 0, -1} //棚B
- %mandef(30)={$7 , 0,$2C, 0, -1} //棚B
-
- &if(%partyexist(2)!=0){
- %mandef(2) ={$A , 0,$2E, 0, -1} //リアナ
- }
- &if(%partyexist(3)!=0){
- %mandef(3) ={$B , 0,$2F, 0, -1} //ダル
- }
- &if(%partyexist(4)!=0){
- %mandef(4) ={$B , 0,$40, 0, -1} //ルシェル
- }
- &if(%partyexist(5)!=0){
- %mandef(5) ={$C , 0,$41, 0, -1} //アゼル
- }
- &if(%partyexist(6)!=0){
- %mandef(6) ={$C , 0,$42, 0, -1} //ダリア
- }
-
- //町ごとのレートを決めるのです!
- &ldef 買相場
- &ldef 売相場
- &if(町==1){
- 買相場=80
- 売相場=50
- }
- &if(町==2){
- 買相場=90
- 売相場=60
- }
- &if(町==3){
- 買相場=100
- 売相場=70
- }
- &if(町==4){
- 買相場=95
- 売相場=65
- }
- &if(町==5){
- 買相場=70
- 売相場=40
- }
- &if(町==6){
- 買相場=85
- 売相場=55
- }
-
- &on
- !o(1)j(2)店主;j(0)いらっしゃい。;ご用は何だい?pc
- &label ショップ1
- %selectlist={買いたい,売りたい,店を出る}
- 選択1=%select
-
- &if(選択1==2){//店を出る
- !o(1)j(2)店主;j(0)ありがとさん。pc
- &if(町==1){&goto MATI1}
- &if(町==2){&goto MATI2}
- &if(町==3){&goto MATI3}
- &if(町==4){&goto MATI4}
- &if(町==5){&goto MATI5}
- &if(町==6){&goto MATI6}
- }
-
- &if(選択1==0){//買いたい
- &ldef SS
- !o(1)j(2)店主;j(0)何が欲しいんだい。pc
- %selectlist={武器,防具,道具}
- &label 別種買う
- 選択2=%select
- &if(選択2==0){//武器
- %shoplist={チバスタード,チツバイハンダー,チクレイモア,ネワンド}
- &if(進行>=42){
- %shoplist={チバスタード,チツバイハンダー,チクレイモア,チ悪魔殺し}
- }
- }
- &if(選択2==1){//防具
- %shoplist={ノスケールメイル,ノブリガンダイン,ノプレートコート,ミバーゴネット,ミアーメット,ハシルク,ヘアメジスト,ムエルフハット}
- &if(進行>=42){
- %shoplist={ノスケールメイル,ノブリガンダイン,ノプレートコート,ノ闇鉄,ミバーゴネット,ミアーメット}
- }
- }
- &if(選択2==2){//道具
- %shoplist={ユポーション,ユハイポーション,ユフルポーション,ユミント,ユハイミント,ユフルミント}
- }
- &if(選択2<0){&jmp 他には}
- &label 同種買う
- SS=%shopsel(買相場)
- &if(SS>0){!o(1)j(2)店主j(0);i(SS)だね。;ありがとさん。pc}
- &if(SS==-1){!o(1)j(2)店主j(0);悪いが、お金が足りないみたいだね。pc}
- &if(SS==-2){!o(1)j(2)店主j(0);おっと、荷物がいっぱいみたいだね。pc}
- &if(SS!=0){&jmp 同種買う}
- !o(1)j(2)店主j(0);他に欲しい物はないかい。pc
- &jmp 別種買う
- }
-
- &if(選択1==1){//売りたい
- &ldef SB
- !o(1)j(2)店主j(0);何を売ってくれんだい。pc
- &label 売る
- 所持金=%gold
- SB=%shopbuy(売相場)
- &if(%gold<0){
- %gold=所持金
- &partyitemin SB
- !o(1)j(2)店主j(0);悪いがお金をもう持てないみたいだね。pc
- &jmp @b
- }
- &if(SB>0){!o(1)j(2)店主j(0);ありがとさん。pc}
- &if(SB==-1){!o(1)j(2)店主j(0);残念だがこれは買い取れないなあ。pc}
- &if(SB!=0){&jmp @b}
- }
- &label 他には
- !o(1)j(2)店主j(0);他に用はないかい?pc
- &jmp ショップ1
-
- //━━━━━━━━━━━━━━━━━━━━━━
- [MISE2]//獣屋
- &sppsp CHR\MISE.SPP //SPP(人/スプライト)ファイルを設定
- &map MAP\MISE2.MAP //マップの設定
- &mapsp MAP\MISE2.SP //BGの設定
- &mappal MAP\MISE2.PAL //BGパレットの設定
- &patternpal GR\CG4.PAL //モンスター用パレット
- %partypoint={21,28}
- 町中=1
- //町ごとのレートを決めるのです!
- &if(町==1){獣相場=10}
- &if(町==4){獣相場=8}
- &if(町==5){獣相場=7}
- &if(町==6){獣相場=6}
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1) ={$9 , 0,$69, 0, -1} //カリス
- %mandef(7) ={$A , 0,$6F, 0, -1} //店主
- %mandef(8) ={$A , 0,$80, 0, -1} //客1
- %mandef(9) ={$F , 0,$81, 0, -1} //客2
- %mandef(10)={$E , 0,$82, 0, -1} //客3
-
- %mandef(11)={$6 , 0,$60, 0, -1} //動物
- %mandef(12)={$6 , 0,$61, 0, -1} //動物
- %mandef(13)={$6 , 0,$62, 0, -1} //動物
- %mandef(14)={$4 , 0,$4C, 0, -1} //動物
- %mandef(15)={$4 , 0,$4D, 0, -1} //動物
- %mandef(16)={$4 , 0,$4E, 0, -1} //動物
- %mandef(17)={$4 , 0,$4F, 0, -1} //動物
- %mandef(18)={$6 , 0,$63, 0, -1} //動物
- %mandef(19)={$6 , 0,$64, 0, -1} //動物
- %mandef(20)={$6 , 0,$65, 0, -1} //動物
- %mandef(21)={$5 , 0,$66, 0, -1} //動物
- %mandef(22)={$5 , 0,$67, 0, -1} //動物
- %mandef(23)={$5 , 0,$68, 0, -1} //動物
-
- %mandef(24)={$5 , 0,$49, 0, -1} //柵
- %mandef(25)={$5 , 0,$4A, 0, -1} //柵
- %mandef(26)={$5 , 0,$4B, 0, -1} //柵
-
- &if(%partyexist(2)!=0){
- %mandef(2) ={$A , 0,$6A, 0, -1} //リアナ
- }
- &if(%partyexist(3)!=0){
- %mandef(3) ={$B , 0,$6B, 0, -1} //ダル
- }
- &if(%partyexist(4)!=0){
- %mandef(4) ={$B , 0,$6C, 0, -1} //ルシェル
- }
- &if(%partyexist(5)!=0){
- %mandef(5) ={$C , 0,$6D, 0, -1} //アゼル
- }
- &if(%partyexist(6)!=0){
- %mandef(6) ={$C , 0,$6E, 0, -1} //ダリア
- }
-
- &on
- !o(1)j(2)店主;j(0)らっしゃい。pc
- &label ショップ2
- %selectlist={売りたい,情報を聞く,店を出る}
- 選択1=%select
- &if(選択1<0){&jmp ショップ2}
- &if(選択1==2){//店を出る
- !o(1)j(2)店主;j(0)まいどー。pc
- &patternpal GR\CG.PAL //モンスター用パレット
- &if(町==1){&goto MATI1}
- &if(町==4){&goto MATI4}
- &if(町==5){&goto MATI5}
- &if(町==6){&goto MATI6}
- }
- &if(選択1==0){//売りたい
- &ldef 次前=0 //0:次,1;前
- 栞=1
- &jsr 獣表示
- %selectlist={次,瘡定,前}//, ,瘻S部売る}
- &label 獣売る
- 選択2=%select
- &if(選択2==3){&jmp @b}
- &if(選択2==0){
- &if(次前==0){//進む
- 栞++
- &if(栞==29){栞=1}
- &jsr 獣表示
- }&else{ //戻る
- 栞--
- &if(栞==0){栞=28}
- &jsr 獣表示
- }
- }
- &if(選択2==2){
- &if(次前==1){//進む
- 次前=0
- %selectlist={次,瘡定,前}
- 栞++
- &if(栞==29){栞=1}
- &jsr 獣表示
- }&else{ //戻る
- 次前=1
- %selectlist={前,瘡定,次}
- 栞--
- &if(栞==0){栞=28}
- &jsr 獣表示
- }
- }
- &if(選択2==1){//決定
- &if(頭数>0){
- カウンタ=頭数
- &label
- 所持金=%gold
- %gold=%gold+単価*カウンタ
- &if(%gold>0){
- &if(カウンタ==頭数){ //全部売る
- %gold=所持金
- !o(1)gj(2)店主j(0);f(頭数)匹で
- !f(単価*カウンタ)Gだ。p;
- !これでいいかい?p;
- &if(%inkeyn==0){
- !o(1)j(2)店主j(0);はいよ
- !。;
- %gold=%gold+単価*カウンタ
- !f(単価*カウンタ)
- !Gだ。gpc
- 獣売数=カウンタ
- &jsr 獣所持数減
- }&else{
- !o(1)j(2)店主j(0);そうか
- !い。pc
- }
- }&else{ //売れるだけ売る
- %gold=所持金
- !o(1)gj(2)店主j(0);f(カウンタ)匹
- !でf(単価*カウンタ)Gだ。
- !;金をもう持てないみたい
- !だから、あとの
- !f(頭数-カウンタ)匹は買い
- !取れないぜ。p;これでいい
- !かい?p;
- &if(%inkeyn==0){
- !o(1)j(2)店主j(0);はいよ
- !。;
- %gold=%gold+単価*カウンタ
- !f(単価*カウンタ)
- !Gだ。gpc
- 獣売数=カウンタ
- &jsr 獣所持数減
- }&else{
- !o(1)j(2)店主j(0);そうか
- !い。pc
- }
- }
- }&else{
- %gold=所持金
- カウンタ--
- &if(カウンタ>0){
- &jmp @b
- }&else{
- !o(1)gj(2)店主j(0);金がもう持てな
- !いみたいだぜ。pc
- }
- }
- &jsr 獣表示
- }
- }
- &if(選択2<0){
- !c
- !o(1)j(2)店主;j(0)他に用はないかい?pc
- &jmp ショップ2
- }
- &jmp 獣売る
-
- }
- &if(選択1==1){//情報
- &if(町==1){
- !o(1)j(2)店主;j(0)そうだな。w;この辺にいるのは…。;
- !j(2)ネズミj(0)、j(2)ウサギj(0)、j(2)タヌキj(0)、j(2)イヌ
- !j(0)ってとこだな。p;
- !北東の半島に行けば…。;
- !j(2)カラスj(0)、j(2)キツネj(0)、j(2)イノシシj(0)、j(2)シ
- !カj(0)なんてのもいるぜ。pc
- }
- &if(町==4){
- !o(1)j(2)店主;j(0)そうだな。w;この辺にいるのは…。;
- !j(2)カエルj(0)、j(2)トカゲj(0)、j(2)ウマj(0)、j(2)オオカ
- !ミj(0)ってとこだな。p;
- !南西のティットとの境界付近に行けば…。;
- !j(2)ワシj(0)、j(2)ヤギj(0)、j(2)ヒョウj(0)、j(2)クマj(0)
- !なんてのもいるぜ。pc
- }
- &if(町==5){
- !o(1)j(2)店主;j(0)そうだな。w;この辺にいるのは…。;
- !j(2)サソリj(0)、j(2)ダチョウj(0)、j(2)ラクダj(0)、j(2)ラ
- !イオンj(0)ってとこだな。p;
- !南西のオルテニスの方に行けば…。;
- !j(2)ワシj(0)、j(2)ヤギj(0)、j(2)ヒョウj(0)、j(2)クマj(0)
- !。p;
- !ティットの西の森林付近に行けば…。;
- !j(2)アルマジロj(0)、j(2)ワニj(0)、j(2)サイj(0)、j(2)ゾウ
- !j(0)なんてのもいるぜ。p
- }
- &if(町==6){
- !o(1)j(2)店主;j(0)そうだな。w;この辺にいるのは…。;
- !j(2)サソリj(0)、j(2)ダチョウj(0)、j(2)ラクダj(0)、j(2)ラ
- !イオンj(0)ってとこだな。p
- !o(1)j(2)店主;j(0)あと、これは特別な情報なんだがなぁ。p;
- !j(2)白虎j(0)、j(2)青竜j(0)、j(2)朱雀j(0)、j(2)玄武j(0)っ
- !て言う珍しい動物が、各地でごくたまに現れるらしいぜ。pc
- }
- }
- !o(1)j(2)店主;j(0)他に用はないかい?pc
- &jmp ショップ2
- //━━━━━━━━━━━━━━━━━━━━━━
- [CLINIC]//オスカー診療所
- &bgm 31
- &sppsp CHR\IV19.SPP
- &map MAP\CLINIC.MAP //マップの設定
- &mapsp MAP\CLINIC.SP //BGの設定
- &mappal MAP\CLINIC.PAL //BGパレットの設定
- %partypoint={0,63,2}
-
- 町中=0
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1)={$4 , 0,$AB, 2, -1} //台
- &if(進行==29){
- %mandef(2)={$B , 0,$E0, 2, 0} //オスカー移動
- %manpoint(2)={8,30}
- %mandef(3)={$B , 0,$EC, 2, 0} //オスカーアニメ
- %mandef(4)={$A , 0,$AD, 2, -1} //リアナ
- %mandef(5)={$9 , 0,$AC, 2, -1} //カリス
- %manpoint(4)={21,46}
- %mandef(6)={$B , 0,$4C, 2, -1} //ルシェル
- }
- &if(進行==34){
- %mandef(2)={$B , 0,$E0, 2, 0} //オスカー移動
- %manpoint(2)={8,30}
- %mandef(4)={$A , 0,$AE, 2, -1} //リアナ
- %manpoint(4)={13,22}
- %mandef(5)={$9 , 0,$20, 8, -1} //カリス
- %manpoint(5)={20,41}
- %mandef(6)={$B , 0,$40, 8, -1} //ルシェル
- %manpoint(6)={23,40}
- %mandef(7)={$C , 0,$60, 2, -1} //アゼル
- %manpoint(7)={19,45}
- %mandef(8)={$C , 0,$61, 2, -1} //ダリア
- %manpoint(8)={23,45}
- }
- &if(進行>=42){
- %mandef(3)={$B , 0,$EC, 2, 0} //オスカーアニメ
- %mandef(5)={$9 , 0,$2C, 2, -1} //カリス
- %manpoint(5)={20,42}
- %manpoint(6)={100,100}
- }
-
- &on
- &if(進行==29){
- &wait 20
- %mandef(3)={$B , 0,$EC, 2, -1} //オスカー
- &on
- &wait 20
- %mandef(3)={$B , 0,$E8, 2, -1} //オスカー
- &on
- &wait 20
- %mandef(3)={$B , 0,$E0, 2, -1} //オスカー
- &on
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);あなたがオスカー医師ですか。pc
- !o(1)j(2)オスカーj(0);そうだが。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);あの私たちミリガル伯爵の執事のアルダムさん
- !からご紹介を受けたのですが。pc
- %mandef(3)={$B , 0,$C3, 2, -1} //オスカー移動
- &on
- !o(1)j(2)オスカーj(0);おっ、アルダムとはなんとも懐かしい名じゃの
- !う。;やつは元気かね。p;
- %mandef(3)={$B , 0,$C4, 2, -1} //オスカー移動
- &on
- !んっ!w;そっちのお嬢さんが患者かっ。pc
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);背中にひどい傷を…。pc
- %mandef(3)={$B , 0,$E0, 2, -1} //オスカー
- &on
- !o(1)j(2)オスカーj(0);うむ、wわかった。;
- %mandef(3)={$B , 0,$C5, 2, -1} //オスカー
- &on
- !さあこっちへ運んで。pc
- &contrast 0
- &wait 200
- %manpoint(3)={100,100}
- %manpoint(4)={100,100}
- %mandef(5)={$9 , 0,$AF, 2, -1} //カリス
- %mandef(6)={$B , 0,$04, 2, -1} //ルシェル
- %manpoint(5)={13,43}
- %manpoint(6)={16,43}
- &on
- &contrast 15
- &manmove 2,2,2,2,2,2,2,2,6,6,6,6,6,6,6
- %manpoint(2)={100,100}
- %manpoint(3)={15,37}
- %mandef(3)={$B , 0,$C0, 2, -1} //オスカー
- &on
- &wait 30
- %mandef(3)={$B , 0,$C1, 2, -1} //オスカー
- &on
- &wait 30
- %mandef(3)={$B , 0,$C2, 2, -1} //オスカー
- &on
- &wait 30
- !o(1)j(2)オスカーj(0);ふぅ…。w;ひどく化膿している。w;鞭傷か。pc
- %mandef(6)={$B , 0,$05, 2, -1} //ルシェル
- &on
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);私のせいでっ…。w;うっwうう…。pc
- !o(1)j(2)オスカーj(0);まあ、アルダムの知人だ。;深くは聞かんよ。p;そ
- !れで、消毒はしたんだが…。
- %mandef(3)={$B , 0,$C6, 2, -1} //オスカー
- &on
- !ww;困ったことに薬がほとんど無い
- !んだよ。pc
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);薬が無いって?pc
- %mandef(3)={$B , 0,$C2, 2, -1} //オスカー
- &on
- !o(1)j(2)オスカーj(0);他の診療所でも同じ状態というか、わしのとこ
- !が一番ましなんじゃが。p;ここ数ヶ月来、薬の元である薬草な
- !どの採取が出来なくなってな…。pc
- %mandef(6)={$B , 0,$04, 2, -1} //ルシェル
- &on
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);もっと詳しく話して下さいっ!pc
- !o(1)j(2)オスカーj(0);ああ、w半年程前か薬草の源泉であるここから西
- !に広がるアンヌ森林に徐々に魔物が溢れ出してきおったんじゃ。
- !pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);魔物が地上に出てきていると言うのですか。pc
- !o(1)j(2)オスカーj(0);魔物は本来洞窟などの闇に潜むものなんじゃが
- !。;あんたらも聞かなかったか、奇怪な叫び声を…。p;あれが
- !聞こえだしてからは、森は昼でも夜のように闇に包まれ、魔
- !物の棲むところとなってしまった。pc
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);…必要な薬草を教えて下さい。pc
- %mandef(3)={$B , 0,$C7, 2, -1} //オスカー
- &on
- !o(1)j(2)オスカーj(0);取りに行くと言うのかっ!pc
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);ああ、リアナを、彼女をこのままにしてはおけな
- !い!pc
- !o(1)j(2)オスカーj(0);無茶だっ!p
- %mandef(3)={$B , 0,$C2, 2, -1} //オスカー
- &on
- !;つい先日もアルテガからきおった、救世軍とかいう救世主と
- !申す若者に率いられた軍隊が森の魔物を退治しようと向かったが。p;
- !もう十日も経っている。;…たぶん全滅したんじゃろう。pc
- %mandef(6)={$B , 0,$06, 2, -1} //ルシェル
- &on
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);救世騎士団、w双子の救世主アゼル様とダリア様
- !がっ!pc
- %mandef(5)={$9 , 0,$C8, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);知ってるのか?pc
- %mandef(6)={$B , 0,$07, 2, -1} //ルシェル
- &on
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);もちろんです。p;
- %mandef(6)={$B , 0,$09, 2, -1} //ルシェル
- &on
- &wait 20
- %mandef(6)={$B , 0,$08, 2, -1} //ルシェル
- &on
- !数々の奇跡をお起こしになられた双子のメシアと言えば、オル
- !トン教ならずとも聞き及んでるはずです。pc
- %mandef(6)={$B , 0,$09, 2, -1} //ルシェル
- &on
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);メシアか…。w;だが、その騎士団が全滅してよう
- !がどうでもいい。p;オレはリアナを助けなくちゃいけないんだ
- !。
- %mandef(5)={$9 , 0,$AF, 2, -1} //カリス
- &on
- !;オスカーさん頼むっ!pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);私も、私も行きます。;カリスさんのサポートぐ
- !らいは出来ます。p;
- %mandef(6)={$B , 0,$06, 2, -1} //ルシェル
- &on
- !オスカーさんお願いします。pc
- %mandef(5)={$9 , 0,$C8, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);ルシェル…。pc
- %mandef(3)={$B , 0,$C6, 2, -1} //オスカー
- &on
- &wait 60
- !o(1)j(2)オスカーj(0);そうか、
- %mandef(3)={$B , 0,$C2, 2, -1} //オスカー
- &on
- !わかった。;今、薬草のスケッチを渡す
- !、それを手がかりに探してくれ。pc
- %mandef(5)={$9 , 0,$AF, 2, -1} //カリス
- %mandef(6)={$B , 0,$04, 2, -1} //ルシェル
- &on
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);すまない。pc
- !o(1)j(2)オスカーj(0);なあに、わしとて患者は助けたい。;だがお前達
- !が命を落とすようなことなどないようになっ。p;それじゃあ、
- !ちょっと待っておれ。pc
- 進行=30
- &contrast 0
- &wait 200
- &goto MATI5
- }
-
- &if(進行==34){
- &manmove 2,2,2,2,2,2
- !o(1)j(2)オスカーj(0);おお、戻ったか。pc
- &manmove 2,6,6,6,6,6,6,6,6,6,6,6,6,-2
- !o(1)j(2)オスカーj(0);薬草は。pc
- %mandef(2)={$B , 0,$E0, 2, -1} //オスカー移動
- &on
- %mandef(5)={$9 , 0,$20, 2, 0} //カリス
- &on
- &manmove 5,8,8,8,8,-8
- %mandef(5)={$9 , 0,$20, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);これです。pc
- !o(1)j(2)オスカーj(0);よしっ、これさえあれば直ぐによくなる。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);よかったです。pc
- %mandef(5)={$9 , 0,$20, 2, 0} //カリス
- &on
- &manmove 5,-2
- %mandef(5)={$9 , 0,$20, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ。pc
- %mandef(2)={$B , 0,$E0, 2, 0} //オスカー移動
- &on
- &manmove 2,4,4,4,4,4,4,4,4,4,4,4,4,8,8,8,8,8
- %mandef(5)={$9 , 0,$20, 2, 0} //カリス
- &on
- &manmove 5,2,2
- %mandef(5)={$9 , 0,$20, 2, -1} //カリス
- &on
- &wait 100
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);カリス、
- !こんな時になんなんだが、僕等と一緒に来ないか。pc
- %mandef(6)={$B , 0,$40, 2, 0} //ルシェル
- &on
- &manmove 6,-2
- %mandef(6)={$B , 0,$40, 2, -1} //ルシェル
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);えっ?pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);…。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);何か目的がある旅なら無理強いはしないけども。;
- !私たちの部下はあの森で全滅してしまったし。p;あなた程の剣
- !士がいてくれると心強いわ。pc
- %mandef(5)={$9 , 0,$62, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);オレの目的は東大陸へ自分の記憶の手がかりを探す
- !ことだ。pc
- &monsprint 24,32,アゼル,1
- &monsprint 104,32,ダリア,0
- !o(1)j(2)アゼル・ダリアj(0);(記憶喪失!?)pc
- &wait 50
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);…東大陸か、なら都合がいい。;僕等の任務のひ
- !とつにも東大陸の調査が含まれている。pc
- %mandef(5)={$9 , 0,$20, 2, -1} //カリス
- &on
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);…そうね。w;リーナスから教会所有の船を使える
- !から、私たちに同行するのはあなたにとってもいい話しじゃな
- !くて。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);辺境の東大陸へ向かう船なんて、探検家ぐらいで
- !めったにいないからな。pc
- %mandef(5)={$9 , 0,$63, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(確かにそうだろうな、辺境と呼ばれる地だ。;商船
- !なんかがポンと行くようなところじゃないか)pc
- %mandef(5)={$9 , 0,$20, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…わかったよ。w;オレも一緒に行かせてくれ。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);よしっ、wじゃあ2、3日で南へ向かうよ。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);フフ。w;改めて宜しくねカリス。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、wこっちこそ。pc
- %mandef(6)={$B , 0,$0A, 2, -1} //ルシェル
- &on
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);あの、私は…。pc
- %mandef(5)={$9 , 0,$28, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ルシェル…。w;君に頼みがあるんだ。pc
- %mandef(6)={$B , 0,$44, 2, -1} //ルシェル
- &on
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);えっ、はい。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);リアナが良くなったら、ジャスタン島へ、彼女の家
- !へ送り届けて欲しいんだ。pc
- %mandef(6)={$B , 0,$0B, 2, -1} //ルシェル
- &on
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);リアナさんを置いていくんですか!pc
- %mandef(5)={$9 , 0,$64, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、彼女をこれ以上巻き込みたくない。p;
- %mandef(6)={$B , 0,$44, 2, -1} //ルシェル
- &on
- !オレに付いてきたばかりに、こんな目にあって…。w;ルシェル、頼
- !まれてくれないか。pc
- %mandef(5)={$9 , 0,$28, 2, -1} //カリス
- &on
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);でも、リアナさんには何も言わずに行ってしま
- !っていいんですか。pc
- %mandef(5)={$9 , 0,$65, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(自分のことも思い出せない人間が、他の人間の
- !責任まで負うことはできないよ)p
- %mandef(5)={$9 , 0,$66, 2, -1} //カリス
- &on
- !o(1)j(2)カリスj(0);ごめん…、wと伝えてくれ。pc
- %mandef(6)={$B , 0,$0C, 2, -1} //ルシェル
- &on
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);(そんな、カリスさんとリアナさんの関係って
- !それくらいのものだったの?p;リアナさんが目覚めた時にカリ
- !スさんが居なかったら、彼女どんなに辛いか…。;でも、wカリ
- !スさんも…)p
- %mandef(6)={$B , 0,$44, 2, -1} //ルシェル
- &on
- !o(1)j(2)ルシェルj(0);…わかりました。p;私の方にこそリアナさんに
- !対して責任がありますから、リアナさんの家までお連れします。
- !pc
- %mandef(5)={$9 , 0,$67, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);すまない、ルシェル…。pc
- &contrast 0
- &wait 200
- %mandef(5)={$9 , 0,$20, 6, -1} //カリス
- %mandef(6)={$B , 0,$40, 6, -1} //ルシェル
- %manpoint(2)={100,100}
- %manpoint(5)={10,21}
- %manpoint(6)={10,23}
- %manpoint(7)={100,100}
- %manpoint(8)={100,100}
- &move 0,21,2
- &contrast 15
-
- &monsprint 104,80,病院01
- &wait 200
- &monsprint 104,80,消し
-
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);(リアナ、オレの用事が済んだら、必ず会いに行
- !くよ)pc
- %mandef(5)={$9 , 0,$20, 6, 0} //カリス
- &on
- &manmove 5,-2
- %mandef(5)={$9 , 0,$20, 6, -1} //カリス
- &on
- !o(1)j(2)カリスj(0);じゃあルシェル、頼んだよ。pc
- %mandef(6)={$B , 0,$40, 6, 0} //ルシェル
- &on
- &manmove 6,-8
- %mandef(6)={$B , 0,$40, 6, -1} //ルシェル
- &on
- &monsprint 160,32,ルシェル
- !o(1)j(2)ルシェルj(0);ええ、カリスさんも気を付けて。pc
- %mandef(5)={$9 , 0,$20, 6, 0} //カリス
- &on
- &manmove 5,4,4,2,2
- &contrast 0
- %mandef(6)={$B , 0,$40, 6, 0} //ルシェル
- &on
- &manmove 6,-4
- %mandef(6)={$B , 0,$40, 6, -1} //ルシェル
- &on
- &manmove 5,2,2,2,2
- 進行=35
- &goto IV19
- }
- &if(進行>=42){
- &wait 20
- %mandef(3)={$B , 0,$EC, 2, -1} //オスカー
- &on
- &wait 20
- %mandef(3)={$B , 0,$E8, 2, -1} //オスカー
- &on
- &wait 20
- %mandef(3)={$B , 0,$E0, 2, -1} //オスカー
- &on
- !o(1)j(2)オスカーj(0);ん、あんたかい。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);リアナは…。pc
- !o(1)j(2)オスカーj(0);あの2人なら船で魔法国アバインへ向かったよ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);魔法国?w;ダリムラクスじゃなく…。pc
- !o(1)j(2)オスカーj(0);ああ、具合が良くなったと思ったら、突然アバ
- !インへ向かうと言い出してな。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(リアナ、一体どうしたんだ…)p
- !o(1)j(2)カリスj(0);わかったありがとう。pc
- 魔法国へ=1
- 町中=0
- &goto MATI5
- }
-
-
- //━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
- [FUNE]//渡し船
- &sppsp CHR\MATI.SPP //SPP(人/スプライト)ファイルを設定
- &bgm 17
- &map MAP\FUNE.MAP //マップの設定
- &mapsp MAP\FUNE.SP //BGの設定
- &mappal MAP\FUNE.PAL //BGパレットの設定
- &if(船==1){%partypoint={@0,2}}
- &if(船==2){%partypoint={@1,2}}
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1) ={$B , 0,$4C, 2, -1} //船頭左
- %mandef(2) ={$B , 0,$4D, 2, -1} //船頭右
- %mandef(3) ={$F , 0,$4E, 2, -1} //受付左
- %mandef(4) ={$F , 0,$4F, 2, -1} //受付右
- %mandef(5) ={$7 , 0,$4B, 2, -1} //ロープ
- %mandef(21)={$5 , 0,$6F, 2, -1} //オール
- %mandef(22)={$5 , 0,$80, 2, -1} //オール
- %mandef(23)={$5 , 0,$81, 2, -1} //オール
- %mandef(24)={$5 , 0,$82, 2, -1} //オール
- %mandef(25)={$5 , 0,$83, 2, -1} //オール
- %mandef(26)={$5 , 0,$84, 2, -1} //オール
-
- %mandef(6) ={$9 , 0,$60, 2, -1} //カリス左
- %mandef(10)={$9 , 0,$64, 2, -1} //カリス右
- &if(%partyexist(2)>0){
- %mandef(7) ={$A , 0,$61, 2, -1} //リアナ左
- %mandef(11)={$A , 0,$65, 2, -1} //リアナ右
- }
- &if(%partyexist(5)>0){
- %mandef(8) ={$C , 0,$62, 2, -1} //アゼル左
- %mandef(12)={$C , 0,$66, 2, -1} //アゼル右
- }
- &if(%partyexist(6)>0){
- %mandef(9) ={$C , 0,$63, 2, -1} //ダリア左
- %mandef(13)={$C , 0,$67, 2, -1} //ダリア右
- }
- &if(進行==14){
- %mandef(14)={$9 , 0,$68, 2, -1} //カリス(ボート)
- %mandef(15)={$A , 0,$69, 2, -1} //リアナ(ボート)
- %mandef(16)={$B , 0,$6A, 2, -1} //船頭(ボート)
- %mandef(17)={$5 , 0,$6B, 2, -1} //オール
- %mandef(18)={$5 , 0,$6C, 2, -1} //オール
- %mandef(19)={$5 , 0,$6D, 2, -1} //オール
- %mandef(20)={$5 , 0,$6E, 2, -1} //オール
- }
-
- &on
- &if(船==1){
- !o(1)j(2)船頭j(0);よお。w;あんたら、川を渡りたいんかい。p;渡るんなら
- !f(%partynumber)人でf(%partynumber*300)Gもううよ。gp
- }&else{
- !o(1)j(2)船頭j(0);こんちわ-。w;船に乗ってくかい。p;乗るんなら
- !f(%partynumber)人でf(%partynumber*300)Gだよ。gp
- }
- &if(%inkeyn==1){
- !o(1)j(2)船頭j(0);そうかい。pc
- }&else{
- &if(%gold>=%partynumber*300){
- %gold=%gold-%partynumber*300
- &if(船==1){
- !o(1)gj(2)船頭j(0);おう、ありがとさん。w;さあ、乗ってきな。pc
- }&else{
- !o(1)gj(2)船頭j(0);どうも。w;さあ、乗ってくれよ。pc
- }
- &if(進行==14){&jmp 渡し船}
- &label 到着
- &if(船==1){
- 船=2
- &contrast 0
- &wait 300
- &move @1,2
- }&else{
- 船=1
- &contrast 0
- &wait 300
- &move @0,2
- }
- &if(船==1){
- !o(1)j(2)船頭j(0);じゃあ、また乗りに来てくんな。pc
- }&else{
- !o(1)j(2)船頭j(0);また用があったら乗っていってよ。pc
- }
- }&else{
- &if(船==1){
- !o(1)j(2)船頭j(0);金が無いんじゃ船には乗せられんな。pc
- }&else{
- !o(1)j(2)船頭j(0);悪いけど、お金が無いとねぇ。pc
- }
- }
- }
- &if(船==1){&goto2 FIELD,@4,2}
- &if(船==2){&goto2 FIELD,@5,2}
-
-
- &label 渡し船
- &move @2,2
- // カリスとリアナは川を渡す子舟の上
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);ねえ、カリス。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ん、何?pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);私ね、魔法が使えて良かったなあって、w少し思えるように
- !なったの。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、wダルやエイアムの町の皆も感謝してたじゃないか。
- !p;それにあの大岩を砕いてくれなかったら、今のエイアムは無かっただ
- !ろうな。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);へへん、wあたしを連れてきて良かったでしょ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、そうだな。w;ほんとはダリムラクスで観光してもら
- !ったら、追い返そうと思ってたんだぜ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);あー、ひどーい。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);でも、追い返さなくて正解だったよ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);フフ、wあたしねぇ。w;もっとこの力を皆の役に立てたいん
- !だ。p;でも、自分でもよく解らないトコがあるから、もっと勉強しなく
- !ちゃ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(だいぶ、ふっきれたみたいだな)pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);とりあえず、あたしカリスの足手まといじゃないよね。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、十分頼れるパートナーさ。p
- !o(1)j(2)カリスj(0);(だけど、ここから先、また何があるかわからない…)p
- !c
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);ありがとう。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);でも、ダルの忠告どおりアルテガじゃ魔法はダメだぜ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);うん、わかってる…。w;カリス、ちゃんと護ってね。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ん、wwああ…。pc
- 進行=15
- &jmp 到着
-
- //━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
- [SEKI]//アザム・オルテニス国境
- &sppsp CHR\MATI.SPP //SPP(人/スプライト)ファイルを設定
- &bgm 23
- &map MAP\SEKI.MAP //マップの設定
- &mapsp MAP\IV08.SP //BGの設定
- &mappal MAP\IV08.PAL //BGパレットの設定
- %partypoint={0,0,-2}
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1)={$9 , 0,$AD, 2, -1} //カリス
-
- &if(%partyexist(2)>0){
- %mandef(2)={$A , 0,$AE, 2, -1} //リアナ
- }
-
- &if(%partyexist(5)>0){
- %mandef(3)={$C , 0,$AF, 2, -1} //アゼル
- }
-
- &if(%partyexist(6)>0){
- %mandef(4)={$C , 0,$C0, 2, -1} //ダリア
- }
-
-
- &on
-
- &if(%partyexist(2)>0){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(この先がアザムか…。w;内乱のせいか、扉が降ろされ
- !ているみたいだな)pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);カリスー。;ここなんか気味が悪いよ。p;なんていう
- !かすごく嫌な感じがするの。;用がないなら早くアルテガに向か
- !おうよ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(嫌な感じ?)p
- !o(1)j(2)カリスj(0);ああ、そうだな。;アルテガに急ごう。pc
- }
- &if(%partyexist(5)==0 and %partyexist(6)>0){
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);カリス、アザムに用でもあるの?pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);えっ、いや。w;ただちょっと…。p
- !o(1)j(2)カリスj(0);(何なんだ、アザム。;この引っかかりは…)pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);ただちょっと、何?pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);何でもない。w;行こう。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);(また、一人で何か考えてたのね。ww;
- !…アザムねぇ)pc
- }
- &if(%partyexist(5)>0 and %partyexist(6)>0){
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);アザム国は、内乱中で入国することは出来ないぞ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);内乱?pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);アゼムの先王ダリクム三世の後継者争い、という情
- !報が教会に入ってるわ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…ダリクム三世?p
- !o(1)j(2)カリスj(0);(知ってる。w;オレ知ってるのか?)pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);どうしたカリス。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);いや、先を急ごう。pc
- }
- &goto2 FIELD,153,31,2
-
- //━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
- [DUN1A]//盗賊のアジト入り口
- &sppsp CHR\DUN1.SPP //SPP(人/スプライト)ファイルを設定
-
- &if(洞窟内==0){&bgm 18}
-
- &map MAP\DUN1A.MAP //マップの設定
- &mapsp MAP\DUN1A.SP //BGの設定
- &mappal MAP\DUN1A.PAL //BGパレットの設定
- %partypoint={20,28,-4}
- &partyspeed 2
-
- &def 洞窟内
- &def 盗賊話し
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1)={$B , 0,$40, 2, -1} //盗賊見張り
- %mandef(2)={$C , 0,$42, 2, -1} //盗賊見張り
- &if(進行>=12){
- %manpoint(1)={1000,1000}
- %manpoint(2)={1000,1000}
- %mandef(3)={$B , 0,$45, 2, -1} //兵士
- %mandef(4)={$B , 0,$45, 2, -1} //兵士
- %mandef(5)={$B , 0,$44, 2, -1} //兵士
- %mandef(6)={$B , 0,$44, 2, -1} //兵士
- %mandef(7)={$B , 0,$46, 2, -1} //兵士
- %mandef(8)={$B , 0,$47, 2, -1} //隊長
- %manpoint(3)={10,10}
- %manpoint(4)={9,14}
- %manpoint(5)={11,17}
- %manpoint(6)={13,13}
- %manpoint(7)={16,11}
- %manpoint(8)={13,19}
- }
-
- &on
- 洞窟内=1
- &if(進行==9){
- &partymove -8
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);やはり、見張りがいるか。;さあ、抜け道はこっち
- !だ。pc
- &partymove 6,6,6,6,6,6
- 進行=10
- }
-
- #@0 &if(%direc<0){
- 洞窟内=0
- &goto2 FIELD,@3,2
- }
- #@1 &if(%direc<0 and 進行<=12){
- &if(進行==12){
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);あとは兵隊に任せて、我々は町に戻ろう。p
- !c
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、皆が心配しているだろうからな。p
- !c
- }&else{
- &if(盗賊話し==0){
- %mandef(2)={$C , 0,$43, 2, -1} //盗賊見張り
- &on
- !o(1)j(2)盗賊j(0);おい、さっき街道の偵察に行って
- !いたのが戻ってきただろ。pc
- %mandef(1)={$A , 0,$41, 2, -1} //盗賊見張り
- &on
- !o(1)j(2)盗賊j(0);ああ、岩をおっこしたとこのだろ
- !。w;それがどうしたんだ。pc
- !o(1)j(2)盗賊j(0);それがなあ、岩がもうぶっ壊され
- !て、街道が通れるようになっちまったそうだ。
- !pc
- !o(1)j(2)盗賊j(0);ダリムラクスの連中、思ってたよ
- !り動きが早いじゃないか。pc
- !o(1)j(2)盗賊j(0);いや、ダリムラクスの兵隊どもじ
- !ゃなく。w;ガキ、wしかも女が一人でやっち
- !まったって…。pc
- !o(1)j(2)盗賊j(0);おい、からかうなよ。pc
- !o(1)j(2)盗賊j(0);いいや、マジらしいぜ。;偵察に行
- !ってたヤツが言うには手のひらから火の玉を
- !出して岩をくだいちまったってよ。pc
- !o(1)j(2)盗賊j(0);そ、wそれって魔法ってヤツかpc
- !o(1)j(2)盗賊j(0);ああ、だろうな。pc
- !o(1)j(2)盗賊j(0);恐ろしいな。w;そんなのがほんと
- !にいるなんて。pc
- !o(1)j(2)盗賊j(0);まあ、世界には魔法国なんて国も
- !あるぐらいだから、そんな連中もうじゃうじ
- !ゃいるんだろうよ。pc
- !o(1)j(2)盗賊j(0);げぇ、俺はそんな連中とは戦いた
- !くねぇな。;気味が悪いよ。pc
- !o(1)j(2)盗賊j(0);そうだな。p;でも、岩が壊された
- !ってことはダリムラクスから兵隊が攻めてく
- !るんじゃねぇのかと思うんだけどよpc
- !o(1)j(2)盗賊j(0);ああ、今回は派手にやったからな
- !。;でも、まだエイアムが襲われたことも知
- !らないだろうから当分平気だろ。pc
- !o(1)j(2)盗賊j(0);だといいけどな。w;なんか嫌な予
- !感がすんだよ。pc
- !o(1)j(2)盗賊j(0);あんま気にすんなって、後でかっ
- !さらってきた女でも抱きゃあ。;そんなの忘
- !れちまうって。pc
- !o(1)j(2)盗賊j(0);ああ、そうだな。;ちっ、早く交替
- !時間にならねぇかな。pc
- %mandef(1)={$A , 0,$40, 2, -1} //盗賊見張り
- %mandef(2)={$C , 0,$42, 2, -1} //盗賊見張り
- &on
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);ふっ、完全に油断しきってるな。p
- !c
- &monsprint 24,32,カリス1
- !o(1)j(2)カリス1j(0);この隙を付いて人質を救い出そ
- !う。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);ああ、急ごう。pc
- 盗賊話し=1
- }&else{
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);これ以上近付くと見つかる。;さあ
- !、急ごう。pc
- }
- }
- &partymove 6,6
- }
-
- //本道
- #@2 &if(%direc<0){&goto2 DUN1B,24,192,8}
-
- //抜け道
- #@3 &if(%direc<0){&goto2 DUN1B,102,192,8}
-
- //━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
- [DUN1B]//盗賊のアジト
- &map MAP\DUN1B.MAP //マップの設定
- &mapsp MAP\DUN1B.SP //BGの設定
- &mappal MAP\DUN1B.PAL //BGパレットの設定
-
- // %bcirclesize=120
- // %bcirclecount=-1
- // &blackcircle 1
-
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- // 1~5は発光石
- // %mandef(1)={$4 , 2,$20, 2, -1} //
-
- &if(宝1==0){
- %mandef(29)={$A , 0,$48, 2, -1} //宝箱
- }&else{
- %mandef(29)={$A , 0,$4B, 2, -1} //宝箱
- }
-
- &if(進行<12){
- %mandef(8)={$E , 0,$80, 2, -1} //盗賊
- %manpoint(8)={38,71}
- %mandef(9)={$B , 0,$A4, 2, -1} //盗賊
- %manpoint(9)={40,76}
- %mandef(10)={$F, 0,$C0, 8, 0} //盗賊
- %manpoint(10)={34,91}
- %mandef(11)={$C, 0,$E0, 8, 0} //盗賊
- %manpoint(11)={32,94}
-
- }
-
- &ldef 突撃
-
- &on
- &if(進行==10){
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);かなり複雑なようだ、迷わんように気をつけよう。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、でもこんなんじゃ、たどり着くのにだいぶ時
- !間が掛かりそうだ。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);我々も、抜け道の存在は知ってるんだが。;実際に通
- !るのは初めてだからな。p;とにかく急ごう。pc
- // !o(1)j(2)ダルj(0);我々も、抜け道の存在は知ってるんだが。実際に通
- // !るのは初めてだからな。p;そうだカリス。;お前にこれを預け
- // !ておこう。pc
- // &monsprint 24,32,カリス1
- // !o(1)j(2)カリスj(0);ん、これは?pc
- // 赤いガラス玉が入った袋を入手
- // &monsprint 24,32,ダル
- // !o(1)j(2)ダルj(0);その発光石を道に置いて目印にするんだ。pc
- // &monsprint 24,32,カリス1
- // !o(1)j(2)カリスj(0);あっ、なるほど。pc
- // &monsprint 24,32,ダル
- // !o(1)j(2)ダルj(0);だがなあ、たくさんばらまいても意味がない。;要所
- // !を選んで、せいぜい5つぐらいが最良だろう。pc
- // &monsprint 24,32,カリス1
- // !o(1)j(2)カリスj(0);わかった。pc
- // &monsprint 24,32,ダル
- // !o(1)j(2)ダルj(0);それと、せっかく置いた目印も外に出ると消えてし
- // !まうから気を付けろよ。pc
- // &monsprint 24,32,カリス1
- // !o(1)j(2)カリスj(0);?pc
- // &monsprint 24,32,ダル
- // !o(1)j(2)ダルj(0);動物とかがエサと間違えて食ってしまうんだろう。p
- // !c
- // &monsprint 24,32,カリス1
- // !o(1)j(2)カリスj(0);(…まあ、そういうことにしておこう)pc
- // &monsprint 24,32,ダル
- // !o(1)j(2)ダルj(0);それじゃあ、急ごうか。pc
-
- // !o(1)j(2)目印石の説明j(0);
- // !発光石を置く時は、置きたい場所でボタンを押して下さい。p;置いた発
- // !光石に向かってボタンを押すと発光石を拾って、また別の場所に置くこ
- // !とが出来ます。p;1ダンジョンで使用できるのは5つまでです。p;ダン
- // !ジョンを出ると発光石は消えますが、発光石が減るということはありま
- // !せん。pc
- 進行=11
- }
-
- //抜け道出入り口
- #@0 &if(%direc<0){&goto2 DUN1A,45,10,2}
-
- //本道出入り口
- #@1 &if(%direc<0){&goto2 DUN1A,14,10,2}
-
- //イベント
- #@2 &if(%direc<0 and 進行==11 and 突撃==0){
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);ん!w;みんな止まれ。pc
- &manmove 10,6,6,8,8,8,8,8,8,8,8,8
- %mandef(10)={$F, 0,$C0, 8, -1} //盗賊
- &on
- !o(1)j(2)盗賊j(0);よお、交替だぜ。pc
- %mandef(9)={$B , 0,$A0, 2, -1} //盗賊
- &on
- &manmove 11,6,6,6,6,8,8,8,8,8,8,8,8,8
- %mandef(11)={$C, 0,$E0, 8, -1} //盗賊
- &on
- !o(1)j(2)盗賊j(0);女共にてー出してねぇだろうなぁ。pc
- !o(1)j(2)盗賊j(0);けっ、何もしちゃいねぇよ。;頭にばれたら殺されちま
- !うかんな。pc
- !o(1)j(2)盗賊j(0);まったくよぉ、自分ばっか上玉食いやがって。;なに
- !が盗賊にも規律をだ。pc
- !o(1)j(2)盗賊j(0);言うなって、もうじきオレたちにも許しが出るだろ
- !うから、それまでの辛抱だって。pc
- !o(1)j(2)盗賊j(0);ああ、じゃあ頼んだぜ。pc
- %mandef(8)={$E , 0,$80, 2, 0} //盗賊
- &on
- &manmove 8,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,4,4,4,4,4
- %manpoint(8)={1000,1000}
- %mandef(9)={$B , 0,$A0, 2, 0} //盗賊
- &on
- &manmove 9,4,4,2,2,2,2,2,2,2,2,2,2,2,2,2,2,4,4,4,4,4
- %manpoint(9)={1000,1000}
- %mandef(10)={$F, 0,$C0, 8, 0} //盗賊
- &on
- &manmove 10,8,8,8,8,8,8,8,8,8,8,6,6,-2
- %mandef(10)={$F, 0,$C0, 2, -1} //盗賊
- %mandef(11)={$C, 0,$E0, 8, 0} //盗賊
- &on
- &manmove 11,8,8,8,8,8,8,8,8,8,8,8,6,6,6,6,-4
- %mandef(11)={$C, 0,$E0, -1, -1} //盗賊
- &on
- &wait 50
- %mandef(11)={$C, 0,$E0, -1, 0} //盗賊
- &on
- &manmove 11,-2
- &wait 50
- &manmove 11,-4,-8
- !o(1)j(2)盗賊j(0);さてと、ちょっとつまみ食いでもするか。pc
- !o(1)j(2)盗賊j(0);おい、本気か。;頭に殺されるぞ。pc
- !o(1)j(2)盗賊j(0);大丈夫、ちょっとだけだって、お前もどうだ。pc
- !o(1)j(2)盗賊j(0);オレはあとでいい、命が大事だかんな。pc
- !o(1)j(2)盗賊j(0);そうか、じゃあ楽しんでくっから、頭の見張りの方
- !も頼むぜ。pc
- !o(1)j(2)盗賊j(0);ちっ、wわかったよ。pc
- &manmove 11,8,8,8,8,8,8,8,8,8,8,8,8,8,8
- !o(1)j(2)人質j(0);きゃあー、やめてー!pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ダル!pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);よし、突っ込もう!pc
- 突撃=1
- }
- #@4 &if(%direc<0 and 進行==11 and 突撃==1){
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);(早く皆を助けなければ!)pc
- &partymove 4,4
- }
- #@3 &if(%direc<0 and 進行==11 and 突撃==1){
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);行くぞっ!pc
- &partyset 3,1,7,8
- &on
- &partymove 8,8,4,4,8,8,4,4,8,8,4,4
- &if(%py==79){&partymove 8}
- &if(%py==80){&partymove 8,8}
- &partymove -8
- %mandef(10)={$F, 0,$C0, 8, 0} //盗賊
- &on
- !o(1)j(2)盗賊j(0);な、wなんだ、てめえら!pc
- &partymove 4,8
-
- &patternpal GR\CG3.PAL //モンスター用パレット
- &bgm 0
- &pcm 9
- &battle $1000,14,盗賊+2,1
- &patternpal GR\CG.PAL //CG用パレット
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &bgm 18
- %manpoint(10)={1000,1000}
- &on
- &wait 60
- !o(1)j(2)盗賊j(0);おいっ、wどうかしたのか。
- !;こっちはこれからだっ…
- &manmove 11,2,2,2,2,2,2,2,2
- !てっ、w敵!pc
- &partymove 8,8
-
- &patternpal GR\CG3.PAL //モンスター用パレット
- &bgm 0
- &pcm 9
-
- &battle $1000,14,盗賊+3,1
- &patternpal GR\CG.PAL //CG用パレット
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &bgm 18
- %manpoint(11)={1000,1000}
- &on
- &partymove 4,4,4,2,2,2,-6
- &wait 20
- &partyout 7
- &partyout 8
- %mandef(6)={$B, 1,$00, 2, -1} //マクス
- %manpoint(6)={39,75}
- %mandef(7)={$F, 1,$20, 4, -1} //ジョン
- %manpoint(7)={39,78}
- &on
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);よし、wジョン、マクス、みんなを先導してくれ。;
- !カリス、私としんがりだ。pc
-
- %mandef(6)={$B, 1,$00, 2, 1} //マクス
- &on
- &manmove 6,6,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8
- %mandef(6)={$B, 1,$00, 2, -1} //マクス
- %mandef(7)={$F, 1,$20, 4, 1} //ジョン
- &on
- &manmove 7,6,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8
- %mandef(7)={$F, 1,$20, 4, -1} //ジョン
- &on
- &partymove 2,2,2,2
- !o(1)j(2)マクスj(0);みんな、助けに来たぞ。pc
- !o(1)j(2)人質j(0);助かったの?pc
- !o(1)j(2)人質j(0);やったわ、助けが来てくれたのね!pc
- !o(1)j(2)ジョンj(0);これから、ここを脱出するから、付いてくるんだ。
- !pc
- !o(1)j(2)人質j(0);きゃー、やったわ!pc
- !o(1)j(2)マクスj(0);静かに!ww;まだ奥に盗賊たちがいるんだ。pc
- !o(1)j(2)人質j(0);!…pc
- !o(1)j(2)ジョンj(0);さあ、行こう。pc
- %mandef(7)={$F, 1,$20, 4, 1} //ジョン
- %manpoint(7)={40,60}
- &on
- &manmove 7,2,2,2,2,2,2,2,2,2,2,2,2,2,2
- %mandef(7)={$F, 1,$20, 4, -1} //ジョン
- &on
- !o(1)j(2)ジョンj(0);ダル、じゃあ行ってるぜ。pc
- &partymove -8
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);ああ、頼んだぞ。pc
- &partymove -2
- %mandef(7)={$F, 1,$20, 4, 1} //ジョン
- &on
- &manmove 7,2,2,2,2,2,6,6,6,6,2,2,6,6,6,6,2,2,6,6,6,6,6,6,6
- %mandef(7)={$F, 1,$20, 4, -1} //ジョン
- %manpoint(7)={1000,1000}
- &on
-
- %mandef(12)={$9, 1,$60, 8, 1} //人質
- %manpoint(12)={40,60}
- &on
- &manmove 12,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,6,6,6,6,2,2,6,6,2,2,6,6,6,6,6,6,6,6,6
- %mandef(12)={$9, 1,$60, 8, -1} //人質
- %manpoint(12)={1000,1000}
-
- &on
- %mandef(13)={$B, 1,$80, 8, 1} //人質
- %manpoint(13)={40,60}
- &on
- &manmove 13,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,6,6,6,6,2,2,6,6,2,2,6,6,6,6,6,6,6,6,6
- %mandef(13)={$B, 1,$80, 8, -1} //人質
- %manpoint(13)={1000,1000}
-
- !o(1)j(2)盗賊j(0);ちっ、頭。;酔っ払ってねちまったよ。;これじゃあ
- !、いつになったら…。pc
- %mandef(22)={$9 , 1,$40, 8, 0} //盗賊
- %manpoint(22)={34,97}
- %mandef(14)={$B, 1,$A0, 8, 1} //人質
- %manpoint(14)={40,60}
- &on
- &manmove 14,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
- %mandef(14)={$B, 1,$A0, 8, -1} //人質
- &on
- &manmove 22,8,8
- !o(1)j(2)盗賊j(0);お、wおいっ!;女たちが逃げてるぞ!pc
- %mandef(14)={$B, 1,$A0, 8, 1} //人質
- &on
- &manmove 14,2,2,2,2,6,6,6,6,2,2,6,6,2,2,6,6,6,6,6,6,6,6,6
- %mandef(14)={$B, 1,$A0, 8, -1} //人質
- %manpoint(14)={1000,1000}
- &on
- &manmove 22,-2
- !o(1)j(2)盗賊j(0);捕虜が脱走してるぞー!pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);見つかったか。;いくぞ、カリス。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ!pc
- &partymove 2,2,2,2
- &manmove 22,-8
-
- &patternpal GR\CG3.PAL //モンスター用パレット
- !o(1)j(2)盗賊j(0);何者だてめえらっ!pc
- &bgm 0
- &pcm 9
-
- &battle $1000,14,盗賊+4,1
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &bgm 18
- %manpoint(22)={1000,1000}
- &on
-
- %mandef(15)={$9, 1,$C0, 8, 1} //人質
- %manpoint(15)={40,64}
- &on
- &manmove 15,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,6,6,6,6,2,2,6,6,2,2,6,6,6,6,6,6,6,6,6
- %mandef(15)={$9, 1,$C0, 8, -1} //人質
- %manpoint(15)={1000,1000}
- &on
- %mandef(16)={$B, 1,$E0, 8, 1} //人質
- %manpoint(16)={40,64}
- &on
- &manmove 16,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,6,6,6,6,2,2,6,6,2,2,6,6,6,6,6,6,6,6,6
- %mandef(16)={$B, 1,$E0, 8, -1} //人質
- %manpoint(16)={1000,1000}
- &on
-
- %mandef(23)={$E , 0,$80, 8, 1} //盗賊
- %manpoint(23)={32,101}
- &on
- &manmove 23,8,8,8,8,6,6,8,8,8,8,8,6,6,-8
- %mandef(23)={$E , 0,$80, 8, -1} //盗賊
- %mandef(24)={$B , 0,$A0, 8, 1} //盗賊
- %manpoint(24)={32,101}
- &on
- &manmove 24,8,8,8,8,6,6,8,8,8,8,8,8
-
- !o(1)j(2)盗賊j(0);おらー、逃がさねえぞ!pc
- &bgm 0
- &pcm 9
-
- &battle $1000,14,盗賊,1,盗賊+1,1
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &bgm 18
- %manpoint(23)={1000,1000}
- %manpoint(24)={1000,1000}
- &on
-
- %mandef(17)={$C, 1,$60, 8, 1} //人質
- %manpoint(17)={40,64}
- &on
- &manmove 17,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,6,6,6,6,2,2,6,6,2,2,6,6,6,6,6,6,6,6,6
- %mandef(17)={$C, 1,$60, 8, -1} //人質
- %manpoint(17)={1000,1000}
- &on
- %mandef(18)={$F, 1,$80, 8, 1} //人質
- %manpoint(18)={40,64}
- &on
- &manmove 18,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,6,6,6,6,2,2,6,6,2,2,6,6,6,6,6,6,6,6,6
- %mandef(18)={$F, 1,$80, 8, -1} //人質
- %manpoint(18)={1000,1000}
- &on
-
- %mandef(25)={$F , 0,$C0, 8, 1} //盗賊
- %manpoint(25)={32,101}
- &on
- &manmove 25,8,8,8,8,6,6,8,8,8,8,8,6,6,-8
- %mandef(25)={$F , 0,$C0, 8, -1} //盗賊
- %mandef(26)={$C , 0,$E0, 8, 1} //盗賊
- %manpoint(26)={32,101}
- &on
- &manmove 26,8,8,8,8,6,6,8,8,8,8,8,8
- %mandef(26)={$C , 0,$E0, 8, -1} //盗賊
- %mandef(22)={$9 , 1,$40, 8, 1} //盗賊
- %manpoint(22)={32,101}
- &on
- &manmove 22,8,8,8,8,6,6,8,8,8,8
- !o(1)j(2)盗賊j(0);なめやがって、ぶち殺してやる!pc
- &bgm 0
- &pcm 9
-
- &battle $1000,14,盗賊+2,1,盗賊+3,1,盗賊+4,1
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &bgm 18
- %manpoint(25)={1000,1000}
- %manpoint(26)={1000,1000}
- %manpoint(22)={1000,1000}
- &on
-
- %mandef(19)={$9, 1,$A0, 8, 1} //人質
- %manpoint(19)={40,64}
- &on
- &manmove 19,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,6,6,6,6,2,2,6,6,2,2,6,6,6,6,6,6,6,6,6
- %mandef(19)={$9, 1,$A0, 8, -1} //人質
- %manpoint(19)={1000,1000}
- &on
- %mandef(20)={$F, 1,$C0, 8, 1} //人質
- %manpoint(20)={40,64}
- &on
- &manmove 20,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,6,6,6,6,2,2,6,6,2,2,6,6,6,6,6,6,6,6,6
- %mandef(20)={$F, 1,$C0, 8, -1} //人質
- %manpoint(20)={1000,1000}
- &on
-
- %mandef(23)={$E , 0,$80, 8, 1} //盗賊
- %manpoint(23)={32,101}
- &on
- &manmove 23,8,8,8,8,6,6,8,8,8,8,8,6,6,-8
- %mandef(23)={$E , 0,$80, 8, -1} //盗賊
- %mandef(24)={$B , 0,$A0, 8, 1} //盗賊
- %manpoint(24)={32,101}
- &on
- &manmove 24,8,8,8,8,6,6,8,8,8,8,8,8
- !o(1)j(2)盗賊j(0);待ちやがれっ!pc
- &bgm 0
- &pcm 9
-
- &battle $1000,14,盗賊,1,盗賊+1,1
- &patternpal GR\CG.PAL //CG用パレット
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &bgm 18
- %manpoint(23)={1000,1000}
- %manpoint(24)={1000,1000}
- &on
-
- %mandef(21)={$C, 1,$E0, 8, 1} //人質
- %manpoint(21)={40,64}
- &on
- &manmove 21,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,6,6,6,6,2,2,6,6,2,2,6,6,6,6,6,6,6,6,6
- %mandef(21)={$C, 1,$E0, 8, -1} //人質
- %manpoint(21)={1000,1000}
- &on
-
- %mandef(6)={$B, 1,$00, 2, 1} //マクス
- %manpoint(6)={40,64}
- &on
- &manmove 6,2,2,2,2,2,2,2,2,2,2
- %mandef(6)={$B, 1,$00, 2, -1} //マクス
- &on
- !o(1)j(2)マクスj(0);2人とも、大丈夫か!pc
- &partymove -8
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);大丈夫だ!;ここは2人で抑えるから、急げ!pc
- %mandef(6)={$B, 1,$00, 2, 1} //マクス
- &on
- &manmove 6,2,2,2,2,2,6,6,6,6,2,2,6,6,2,2,6,6,6,6,6,6,6,6,6
- %mandef(6)={$B, 1,$00, 2, -1} //マクス
- %manpoint(6)={1000,1000}
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ダル、来るっ!pc
- &partymove -2
-
- %mandef(25)={$F , 0,$C0, 8, 1} //盗賊
- %manpoint(25)={32,101}
- &on
- &manmove 25,8,8,8,8,6,6,8,8,8,8,8,6,6,-8
- %mandef(25)={$F , 0,$C0, 8, -1} //盗賊
- %mandef(26)={$C , 0,$E0, 8, 1} //盗賊
- %manpoint(26)={32,101}
- &on
- &manmove 26,8,8,8,8,6,6,8,8,8,8,8,8
- %mandef(26)={$C , 0,$E0, 8, -1} //盗賊
- %mandef(22)={$9 , 1,$40, 8, 1} //盗賊
- %manpoint(22)={32,101}
- &on
- &manmove 22,8,8,8,8,6,6,8,8,8,8
- &patternpal GR\CG3.PAL //モンスター用パレット
- !o(1)j(2)盗賊j(0);やっちまえっ!pc
- &bgm 0
- &pcm 9
-
- &battle $1000,14,盗賊+2,1,盗賊+3,1,盗賊+4,1
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &bgm 18
- %manpoint(22)={1000,1000}
- %manpoint(23)={1000,1000}
- %manpoint(25)={1000,1000}
- %manpoint(26)={1000,1000}
- &on
-
- %mandef(24)={$B , 0,$A0, 8, 1} //盗賊
- %manpoint(24)={32,101}
- &on
- &manmove 24,8,8,8,8,6,6,8,8,8,8,8,6,6,-8
- %mandef(24)={$B , 0,$A0, 8, -1} //盗賊
- %mandef(25)={$F , 0,$C0, 8, 1} //盗賊
- %manpoint(25)={32,101}
- &on
- &manmove 25,8,8,8,8,6,6,8,8,8,8,8,8
- !o(1)j(2)盗賊j(0);ぶっ殺すっ!pc
- &bgm 0
- &pcm 9
-
- &battle $1000,14,盗賊+1,1,盗賊+2,1
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &bgm 18
- %manpoint(24)={1000,1000}
- %manpoint(25)={1000,1000}
- &on
-
- %mandef(26)={$C , 0,$E0, 8, 1} //盗賊
- %manpoint(26)={32,101}
- &on
- &manmove 26,8,8,8,8,6,6,8,8,8,8,8,6,6,-8
- %mandef(26)={$C , 0,$E0, 8, -1} //盗賊
- %mandef(22)={$9 , 1,$40, 8, 1} //盗賊
- %manpoint(22)={32,101}
- &on
- &manmove 22,8,8,8,8,6,6,8,8,8,8,8,8
- %mandef(22)={$9 , 1,$40, 8, -1} //盗賊
- %mandef(23)={$E , 0,$80, 8, 1} //盗賊
- %manpoint(23)={32,101}
- &on
- &manmove 23,8,8,8,8,6,6,8,8,8,8
- !o(1)j(2)盗賊j(0);ちっ、調子に乗んなよ!pc
- &bgm 0
- &pcm 9
-
- &battle $1000,14,盗賊,1,盗賊+1,1,盗賊+4,1
- &patternpal GR\CG.PAL //CG用パレット
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &bgm 18
- %manpoint(22)={1000,1000}
- %manpoint(23)={1000,1000}
- %manpoint(26)={1000,1000}
- &on
-
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ハア、ハア、きりがない…。pc
- !o(1)j(2)盗賊j(0);たいへんだ!;ダリムラクスの軍隊が攻めてきたぞ!
- !pc
- !o(1)j(2)盗賊j(0);捕虜は逃げるし、なんなんだ一体!pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);どうやら援軍が来たみたいだな。;カリス、我々もひ
- !くぞ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);助かった。;しかし、ずいぶんと早いな。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);これも、お嬢ちゃんが大岩を消してくれたお蔭だ。p
- !c
- &contrast 0
- 進行=12
- &partymove 8,8,8,8,6,6,6,6,6,6,6,6,6,2,2,6,6,6,6,6,6
- &goto2 DUN1A,45,10,2
- }&else{
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);あとは兵隊に任せて、我々は町に戻ろう。p
- !c
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、皆が心配しているだろうからな。p
- !c
- &partymove 6,6
- }
-
- #1 %manpoint(1)={1000,1000}
- &on
- 目印1=0
- #2 %manpoint(2)={1000,1000}
- &on
- 目印2=0
- #3 %manpoint(3)={1000,1000}
- &on
- 目印3=0
- #4 %manpoint(4)={1000,1000}
- &on
- 目印4=0
- #5 %manpoint(5)={1000,1000}
- &on
- 目印5=0
-
- #29 &if(宝1==0){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ん?w;宝箱?pc
- &pcm 18
- %mandef(29)={$A , 0,$49, 2, -1} //宝箱
- &wait 5
- &on
- %mandef(29)={$A , 0,$4A, 2, -1} //宝箱
- &wait 5
- &on
- %mandef(29)={$A , 0,$4B, 2, -1} //宝箱
- &wait 5
- &on
- &wait 20
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ロープ?p
- !o(1)j(2)カリスj(0);…メモが入ってるな。;p
- !o(1)j(2)カリスj(0);【ラッキー!! これで動物がもう10匹
- !多く捕まえられるよ!】;p
- !o(1)j(2)カリスj(0);ラ、ラッキーって…。w;まあいいもらって
- !おこう。pc
- &pcm 10
- !o(1);j(2)魔法のロープj(0)を入手!pc
- 宝1=1
- 魔法のロープ++
- }
-
- #@49 //敵出現
- &if(%direc>=0){&&} //イベント上でボタンが押されたら処理中断
- // &if(%direc>=0){&jsr 発光石} //イベント上でボタンが押されたら処理中断
- &if(敵出現==1){&&} //デバックモード
- &if(%rnd(100)<85){&&} //乱数が80より小さければ処理中断
- &if(%systime<100){&&} //前回の戦闘から80ターン経っていなければ処理中断
-
- 敵確率1=%rnd(100)
- &patternpal GR\CG3.PAL //モンスター用パレット
- &bgm 0
- &pcm 9
-
- &if(敵確率1>=0 and 敵確率1<25 ){&battle 0,14,ウィスプ,1+%rnd(3)}
- &if(敵確率1>=25 and 敵確率1<50 ){&battle 0,14,グール,1+%rnd(3)}
- &if(敵確率1>=50 and 敵確率1<75 ){&battle 0,14,スライム,1+%rnd(3)}
- &if(敵確率1>=75 and 敵確率1<100){&battle 0,14,ヴァンパイア,1+%rnd(2)}
- &patternpal GR\CG.PAL //CG用パレット
-
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &bgm 18
-
- &if(敵出1==0){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ちっ、モンスターか!pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);全く人の出入りが無かったからな。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);やつらの巣になってたってわけか。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);急いでるというのに…。;p
- !とにかく無駄に相手をしてる暇は無い。;大して強力なやつら
- !じゃないが、出来るだけ戦闘は避けていこう。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、後には盗賊どもが控えているからな。pc
- 敵出1=1
- }
-
- %systime=0
-
- &&
-
- //━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
- [DUN2]//牢獄
- &sppsp CHR\DUN2.SPP
- &map MAP\DUN2.MAP //マップの設定
- &mapsp MAP\DUN2.SP //BGの設定
- &mappal MAP\DUN2.PAL //BGパレットの設定
- &partyspeed 2
- %partypoint={31,0,2}
-
- &ldef 棚1
- &ldef 棚2
- &ldef 棚3
- &ldef 棚4
- &ldef 警報
- &ldef 警備1
- &ldef 警備2
- &ldef 警備3
- &ldef 警備4
- &ldef 発見
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- // 1~5は発光石
- // %mandef(1)= {$4, 2,$20, 2, -1} //ポール
-
- %mandef(6)= {$2, 0,$AB, 2, -1} //扉
- %mandef(7)= {$2, 0,$AB, 2, -1} //扉
- %mandef(8)= {$2, 0,$AB, 2, -1} //扉
- %mandef(9)= {$2, 0,$AB, 2, -1} //扉
- %mandef(10)={$2, 0,$AB, 2, -1} //扉
- %mandef(11)={$2, 0,$AB, 2, -1} //扉
- %mandef(12)={$2, 0,$AB, 2, -1} //扉
- %mandef(13)={$2, 0,$AC, 2, -1} //牢扉
- %mandef(15)={$2, 0,$AC, 2, -1} //牢扉
- %mandef(21)={$0, 0,$00, 0, -1} //牢扉
- %mandef(22)={$A, 1,$28, 2, -1} //宝箱
- %mandef(24)={$0, 0,$00, 0, -1} //棚
- %mandef(25)={$0, 0,$00, 0, -1} //棚
- %mandef(28)={$B, 0,$C4, 2, -1} //警備
- %mandef(29)={$B, 0,$C4, 2, -1} //警備
- &if(進行<25){
- %mandef(14)={$2, 0,$AC, 2, -1} //牢扉
- %mandef(16)={$2, 0,$AC, 2, -1} //牢扉
- %mandef(17)={$2, 0,$AD, 2, -1} //牢扉
- %mandef(18)={$2, 0,$AD, 2, -1} //牢扉
- %mandef(19)={$2, 0,$AD, 2, -1} //牢扉
- %mandef(20)={$2, 0,$AD, 2, -1} //牢扉
- %mandef(23)={$F, 0,$A0, 2, -1} //マリーヌ
- %mandef(26)={$0, 0,$00, 0, -1} //棚
- %mandef(27)={$0, 0,$00, 0, -1} //棚
- %mandef(30)={$B, 0,$C4, 2, -1} //警備
- %mandef(31)={$B, 0,$C4, 2, -1} //警備
- %mandef(32)={$B, 0,$C4, 2, -1} //警備
- %mandef(33)={$B, 0,$C4, 2, -1} //警備
- %manpoint(26)={16,33}
- %manpoint(27)={22,33}
- }&else{
- %mandef(14)={$2, 0,$AC, 2, -1} //牢扉
- %mandef(16)={$2, 0,$AC, 2, -1} //牢扉
- %mandef(17)={$A, 0,$A3, 2, -1} //リアナ
- %mandef(38)={$A, 0,$A4, 2, -1} //リアナ
- %mandef(18)={$C, 0,$C6, 2, -1} //看守
- %mandef(20)={$B, 0,$C4, 2, -1} //警備
- %mandef(21)={$B, 0,$C4, 2, -1} //警備
- %mandef(22)={$B, 0,$C4, 2, -1} //警備
- %mandef(23)={$B, 0,$C4, 2, -1} //警備
- %mandef(26)={$B, 0,$C4, 2, -1} //警備
- %mandef(27)={$B, 0,$C4, 2, -1} //警備
- %manpoint(13)={186,130}
- %manpoint(14)={186,138}
- %manpoint(15)={216,130}
- %manpoint(16)={216,138}
- %manpoint(17)={185,117}
- %manpoint(38)={187,117}
- %manpoint(18)={18,36}
- %manpoint(20)={30,150}
- %manpoint(21)={36,150}
- %manpoint(22)={198,121}
- %manpoint(23)={204,121}
- %manpoint(26)={142,144}
- %manpoint(27)={148,144}
- }
-
- &on
-
- #50
-
- #1 %manpoint(1)={1000,1000}
- &on
- 目印1=0
- #2 %manpoint(2)={1000,1000}
- &on
- 目印2=0
- #3 %manpoint(3)={1000,1000}
- &on
- 目印3=0
- #4 %manpoint(4)={1000,1000}
- &on
- 目印4=0
- #5 %manpoint(5)={1000,1000}
- &on
- 目印5=0
-
- #6 &pcm 6
- %manpoint(%manno)={1000,1000}
- &on
- &if(進行>=25){警報=1}
-
- #7 &if(進行>=26){
- &pcm 6
- %manpoint(%manno)={1000,1000}
- &on
- }&else{
- &if(進行<23){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(持っている鍵じゃ開かないな。;他をあ
- !たろう)pc
- }&else{
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);今、持っている鍵じゃ開かないな。;他を
- !あたろう。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);はい。pc
- }
- }
-
- #8 &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(ここは警備の兵士たちの詰所だな。;こんなところに踊り
- !込んだんじゃ、元も子もないぞ)pc
-
- #9 &link 7
-
- #10 &pcm 6
- %manpoint(%manno)={1000,1000}
- &on
- &if(進行==25){
- %mandef(18)={$C,0,$C7,2,-1} //看守
- &wait 50
- &on
- !o(1)j(2)男j(0);あ、あんたがカリスか?pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);看守のトニオ?pc
- !o(1)j(2)トニオj(0);ああ、そうだ。pc
- &partyspeed 1
- &if(%px>18){&partymove 4}
- &if(%px<18){&partymove 6}
- &partymove 8,8,8,8,8,8,8,8,8,8
- &partyspeed 2
- !o(1)j(2)トニオj(0);ほら、これが上の階に行く鍵と、あんたの彼女が
- !ぶち込まれてるトコの鍵だ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);すまないな。pc
- !o(1)j(2)トニオj(0);まあ、金のためさ。p;
- !ああ、それと行けば判かるがあんたの彼女、酷い怪我してるぜ
- !。;あのいけすかねえ異端審問官の野郎に拷問されたんだ。p;
- !助け出したら直ぐ医者に診せた方がいい。;この町も急いで出
- !るんだな。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);怪我っ!ww;わかった…。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);w(ごめんなさい、w私のせいで…)p
- !o(1)j(2)ルシェルj(0);…カリスさん、早くリアナさんを…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ…pc
- !o(1)j(2)トニオj(0);おっと、悪いがオレを殴り倒してくれ。;すんなり
- !鍵を渡したんじゃ、いいわけが立たないだろ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);すまない。pc
- &pcm 8
- &partymove -8
- %mandef(18)={$C,0,$C8,2,-1} //看守
- &on
- !o(1)j(2)トニオj(0);うっ、w…頑張れよ。pc
- %mandef(18)={$C,0,$C9,2,-1} //看守
- &wait 30
- &on
- %mandef(18)={$C,0,$CA,2,-1} //看守
- &wait 30
- &on
- %mandef(18)={$C,0,$CB,2,-1} //看守
- &wait 30
- &on
- 進行=26
- }
-
-
- #11 &if(進行<25){
- &pcm 6
- %manpoint(%manno)={1000,1000}
- &on
- }&else{
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(…ここは前に来たな)pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);今、持っている鍵じゃ開かない。;他をあたろう。
- !pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);あ、はい。pc
- }
- #12 &link 11
-
- #13 &if(進行<25){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(ここか…。;あの娘が伯爵の令嬢だな)pc
- &pcm 6
- %manpoint(%manno)={1000,1000}
- &on
- %mandef(23)={$F,0,$A1,2,-1} //マリーヌ
- &wait 100
- &on
- %mandef(23)={$F,0,$A2,2,-1} //マリーヌ
- &wait 20
- &on
- %mandef(23)={$F,0,$40,2,0} //マリーヌ
- &wait 20
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);マリーヌ様ですね。pc
- !o(1)j(2)マリーヌj(0);だ、w誰ですの?pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ミリガル伯爵より命を受けました、カリスと申し
- !ます。pc
- &manmove 23,2,2
- !o(1)j(2)マリーヌj(0);お父様の!w;私を、w私をここから出してくれる
- !の。w;お父様の元へ帰してくれるの。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);はい、お助けに上がりました。w;さあ、いつ見つ
- !かるかわかりません。;お早く。pc
- &manmove 23,2,2,2,2,2,2,2,2
- !o(1)j(2)マリーヌj(0);ええ。w;ありがとう。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);礼には及びません。;それに、ここをうまく脱出出
- !来てからで結構ですよ。p;それでは、しっかり付いてきて下さ
- !い。pc
- !o(1)j(2)マリーヌj(0);はい、カリス殿。pc
- %mandef(23)={$F,0,$00,2,-1} //マリーヌ
- %manpoint(23)={1000,1000}
- &partyin 12
- &on
- 進行=22
- 警報=1
- }&else{
- // 牢の扉を開けると背中を鞭で打たれたリアナが横たわっていた。
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);リアナっ!pc
- &pcm 6
- %manpoint(%manno)={1000,1000}
- &on
- // リアナに駆け寄る。
- &if(%px>186){&partymove 4}
- &if(%px<186){&partymove 6}
- &partymove 8,8,8,8,8,8,8,8,8,8,8,8
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);っきしょーっ!pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);酷いっ!w;ごめんなさいリアナさん。;私のせい
- !で、本当にひっく…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);リアナ!w;リアナっ!pc
- %mandef(17)={$A, 0,$A5, 2, -1} //リアナ
- %mandef(38)={$A, 0,$A6, 2, -1} //リアナ
- &on
- &wait 50
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);wカwリwスw…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);よし、大丈夫だ。w;直ぐに医者に診せてやるから
- !な!pc
- 進行=27
- %partydef(1) = {$9,0,$E0,0,-1,0,-1,-1,-1,-1}
- %mandef(19)={$E, 0,$C0, 8, -1} //審問官
- %mandef(30)={$D, 0,$C5, 2, -1} //聖騎士
- %mandef(31)={$D, 0,$C5, 2, -1} //聖騎士
- %mandef(32)={$D, 0,$C5, 2, -1} //聖騎士
- %mandef(33)={$D, 0,$C5, 2, -1} //聖騎士
- %mandef(34)={$D, 0,$C5, 2, -1} //聖騎士
- %manpoint(19)={33,158}
- %manpoint(30)={30,152}
- %manpoint(31)={36,152}
- %manpoint(32)={33,153}
- %manpoint(33)={31,155}
- %manpoint(34)={35,155}
- %manpoint(17)={1000,1000}
- %manpoint(38)={1000,1000}
- &on
- }
-
- #14 &if(進行<25){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(ここには誰も居ないか…)pc
- }&else{
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…。pc
- }
- #15 &link 14
- #20 &link 14
- #16 &if(進行<25){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(ここにも捕らわれているのか…。ww;気の毒だけ
- !ど…)pc
- }&else{
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…。pc
- }
- #21 &link 16
- #17 &link 16
- #19 &link 16
- #22 &if(宝2==0){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ん?w;宝箱?pc
- &pcm 18
- %mandef(22)={$A , 1,$29, 2, -1} //宝箱
- &wait 5
- &on
- %mandef(22)={$A , 1,$2A, 2, -1} //宝箱
- &wait 5
- &on
- %mandef(22)={$A , 1,$2B, 2, -1} //宝箱
- &wait 5
- &on
- &wait 20
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ロープ?p
- !o(1)j(2)カリスj(0);…メモが入ってるな。;p
- !o(1)j(2)カリスj(0);【ラッキー!! これで動物がもう10匹
- !多く捕まえられるよ!】;p
- !o(1)j(2)カリスj(0);ラ、ラッキーって…。w;まあいいもらって
- !おこう。pc
- &pcm 10
- !o(1);j(2)魔法のロープj(0)を入手!pc
- 宝2=1
- 魔法のロープ++
- }
- #18 &if(進行<25){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(ここにも捕らわれているのか…。ww;気の毒だけ
- !ど…)pc
- }&else{
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);気絶しています…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);すまない…。pc
- }
-
- #24 &if(棚1==0){
- &if(%rasthaveitem>0){
- &pcm 10
- !o(1);j(2)ユハイポーションj(0)を入手!pc
- &partyitemin ユハイポーション
- 棚1=1
- }
- }
- #25 &if(棚2==0){
- &if(%rasthaveitem>0){
- &pcm 10
- !o(1);j(2)ユハイポーションj(0)を入手!pc
- &partyitemin ユハイポーション
- 棚2=1
- }
- }
- #26 &if(棚3==0){
- &if(%rasthaveitem>0){
- &pcm 10
- !o(1);j(2)ユハイポーションj(0)を入手!pc
- &partyitemin ユハイポーション
- 棚3=1
- }
- }
- #27 &if(棚4==0){
- &if(%rasthaveitem>0){
- &pcm 10
- !o(1);j(2)ユハイポーションj(0)を入手!pc
- &partyitemin ユハイポーション
- 棚4=1
- }
- }
-
- #29 &link 14
- #30 &link 14
- #31 &link 14
-
-
- #@0 &if(%direc<0){
- &if(進行==22){&goto IV13}
- &if(進行==27){&goto IV16}
- &if(進行==21){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(伯爵の令嬢は地下2階の牢だ。;騒ぎに
- !ならないうちに救出しなければ)pc
- }&else{
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);まずはトニオという看守の方を探すん
- !ですよね。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、そいつにリアナの居場所を聞かな
- !ければ。p
- !o(1)j(2)カリスj(0);(リアナ…)pc
- }
- &partymove 2,2
- }
-
- #@1 &if(%direc<0){
- &if(進行<25){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(ちっ、こっちには行けそうにないな。;
- !他を探そう)pc
- }&else{
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);こっちには行けそうにないな。;他の道を
- !探そう。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);そうですね。pc
- }
- &partymove 8,8
- }
-
- //F1->B1左
- #@2 &if(%direc<0){
- &pcm 7
- &move 125,68,2
- }
- //F1->B1右
- #@3 &if(%direc<0){
- &pcm 7
- &move 157,68,2
- }
- //B1->F1左
- #@4 &if(%direc<0){
- &pcm 7
- &move 41,82,8
- }
- //B1->F1右
- #@5 &if(%direc<0){
- &pcm 7
- &move 73,82,8
- }
- //B1戦闘
- #@6 &if(%direc<0 and 警備1==0){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(この先か…。w;やるしかないな)pc
- &partymove 2,2,2,2
- %mandef(30)={$B,0,$60,2,0} //警備
- %mandef(31)={$B,0,$60,2,0} //警備
- &on
- &manmove 31,-4
- &manmove 30,-6
- !o(1)j(2)警備兵j(0);な、なんだきさまっ!pc
- !o(1)j(2)警備兵j(0);曲者かっ!pc
- &manmove 31,4,4,-8
- &manmove 30,6,6,-8
- &patternpal GR\CG3.PAL //モンスター用パレット
- &bgm 0
- &pcm 9
-
- &battle $1000,14,41,1,42,1
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &bgm 19
- &patternpal GR\CG.PAL //CG用パレット
- 警備1=1
- %mandef(30)={$B,0,$00,2,-1} //警備
- %mandef(31)={$B,0,$00,2,-1} //警備
- %manpoint(30)={1000,1000}
- %manpoint(31)={1000,1000}
- &on
- }
-
- //B1->B2 B2戦闘
- #@7 &if(%direc<0){
- &pcm 7
- &move 199,46,2
- &if(警備2==0){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(くっ、続けてか)pc
- %mandef(32)={$B,0,$60,2,0} //警備
- %mandef(33)={$B,0,$60,2,0} //警備
- &on
- &manmove 32,-6
- &manmove 33,-4
- !o(1)j(2)警備兵j(0);んっ?w;きさま何者だ!pc
- !o(1)j(2)警備兵j(0);曲者めっ!pc
- &manmove 32,6,6
- &manmove 33,4,4
- &patternpal GR\CG3.PAL //モンスター用パレット
- &bgm 0
- &pcm 9
-
- &battle $1000,14,43,1,42,1
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &bgm 19
- &patternpal GR\CG.PAL //CG用パレット
- 警備2=1
- %mandef(32)={$B,0,$00,2,-1} //警備
- %mandef(33)={$B,0,$00,2,-1} //警備
- %manpoint(32)={1000,1000}
- %manpoint(33)={1000,1000}
- &on
- }
- }
- //B2->B1
- #@8 &if(%direc<0){
- &pcm 7
- &move 141,48,8
- }
- //F1->F2
- #@9 &if(%direc<0){
- &pcm 7
- &move 17,122,8
- }
- //F1->F2
- #@10 &if(%direc<0){
- &pcm 7
- &move 49,122,8
- }
- //F2->F1
- #@11 &if(%direc<0){
- &pcm 7
- &move 41,24,2
- }
- //F2->F1
- #@12 &if(%direc<0){
- &pcm 7
- &move 73,24,2
- }
- //F2->F3
- #@13 &if(%direc<0){
- &pcm 7
- &move 89,124,8
- }
- //F3->F2
- #@14 &if(%direc<0){
- &pcm 7
- &if(進行==27 and 警備4==0){
- &move 33,146,-2
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);カリスさんっ!pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);くっ…。pc
- !o(1)j(2)異端審問官j(0);曲者と聞いて、直ぐにお前達だと判かったぞ
- !。p;さあ観念するんだな。;お前達もたっぷりといたぶってや
- !ろう。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);きさまーっ!w;ぶっ殺してやるっ!p
- !o(1)j(2)カリスj(0);(力を、wwオレに力をっ!)pc
- &pcm 11
- &wait 80
- &pcm 12
- &freash $0952
- &freash $0190
- &wait 50
- !o(1)j(2)異端審問官j(0);ふっ、w仕方がないこの場でなぶり殺
- !してくれるはー!pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);w…ルシェル、リアナを頼む。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);は、wはい。pc
- %mandef(37)={$B,0,$A7,2,-1} //ルシェル
- %mandef(38)={$A,0,$A8,2,-1} //リアナ
- %manpoint(37)={32,144}
- %manpoint(38)={34,144}
- &partyout 4
- &on
-
- //レベルを上げる
- &ldef カリスLV=%partylevel(1)
- &if(%partylevel(1)<50){
- %partydef(1)={$9,0,$E0,0,50,0,-1,-1,-1,-1}
- &on
- &complete
- }
- &partymove 2,2,2
- !o(1)j(2)異端審問官j(0);皆の者いけーっ!pc
- &patternpal GR\CG3.PAL //モンスター用パレット
- &bgm 0
- &pcm 9
-
- &battle $1000,14,44,1,45,1,46,1
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &bgm 19
- %manpoint(30)={1000,1000}
- &on
- &bgm 0
- &pcm 9
-
- &battle $1000,14,44,1,45,1,46,1
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &bgm 19
- %manpoint(31)={1000,1000}
- &on
- &partymove 2
- &bgm 0
- &pcm 9
-
- &battle $1000,14,44,1,45,1,46,1
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &bgm 19
- %manpoint(32)={1000,1000}
- &on
- !o(1)j(2)異端審問官j(0);なにをやっておるかっ!;相手は小僧
- !一匹だぞっ!pc
- &partymove 2,2
- &bgm 0
- &pcm 9
-
- &battle $1000,14,44,1,45,1,46,1
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &bgm 19
- %manpoint(33)={1000,1000}
- &on
- &bgm 0
- &pcm 9
-
- &battle $1000,14,44,1,45,1,46,1
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &bgm 19
- %manpoint(34)={1000,1000}
- &on
- &patternpal GR\CG.PAL //CG用パレット
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);さあ、次はお前の番だぜ。pc
- !o(1)j(2)異端審問官j(0);く、くーっ!pc
- &partymove 2,2,2
- &patternpal GR\CG3.PAL //モンスター用パレット
- &bgm 0
- &pcm 9
-
- &battle $1000,14,47,1
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &bgm 19
- &patternpal GR\CG.PAL //CG用パレット
- //レベルを下げる
- %partydef(1)={$9,0,$E0,0,カリスLV,0,-1,-1,-1,-1}
- &on
- !o(1)j(2)異端審問官j(0);ぬあぁ、w邪教徒ごときにーっ!pc
- %manpoint(19)={1000,1000}
- &on
- &wait 50
- %mandef(37)={$B,0,$A9,2,-1} //ルシェル
- %mandef(38)={$A,0,$AA,2,-1} //リアナ
- &on
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);(w…怖い。ww;何なのかしら、カリス
- !さんから凄く邪悪なものを感じる)pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ふ───っ!wwpc
- &partymove 8,8,8,8,8,8,8
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);さあ、邪魔は消えた。;ここを出るぞ。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);は、wはい。pc
- &partymove -2
- &partyin 4
- %manpoint(37)={1000,1000}
- %manpoint(38)={1000,1000}
- &on
- 警備4=1
- }&else{
- &move 33,146,2
- }
- }
- //F3->F4
- #@15 &if(%direc<0){
- &pcm 7
- &move 133,128,8
- }
- //F3->F4
- #@16 &if(%direc<0){
- &pcm 7
- &move 157,128,8
- }
- //F4->F3
- #@17 &if(%direc<0){
- &pcm 7
- &move 77,140,2
- }
- //F4->F3
- #@18 &if(%direc<0){
- &pcm 7
- &move 101,140,2
- }
- //F4->F5 戦闘
- #@19 &if(%direc<0){
- &pcm 7
- &move 201,128,8
- &if(%direc<0 and 警備3==0){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(よしっ、最上階だ)pc
- %mandef(22)={$B,0,$60,2,0} //警備
- %mandef(23)={$B,0,$60,2,0} //警備
- &on
- !o(1)j(2)警備兵j(0);曲者めっ!pc
- !o(1)j(2)警備兵j(0);お前達、あの魔女の仲間だな!;成敗して
- !くれる。pc
- &partymove 8,8,8
- &manmove 22,2,2,-6
- &manmove 23,2,2,-4
- &patternpal GR\CG3.PAL //モンスター用パレット
- &bgm 0
- &pcm 9
-
- &battle $1000,14,41,1,43,1
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &bgm 19
- &patternpal GR\CG.PAL //CG用パレット
- 警備3=1
- %mandef(22)={$B,0,$00,2,-1} //警備
- %mandef(23)={$B,0,$00,2,-1} //警備
- %manpoint(22)={1000,1000}
- %manpoint(23)={1000,1000}
- &on
- }
- }
- //F5->F4
- #@20 &if(%direc<0){
- &pcm 7
- &move 145,144,2
- }
-
- //F2戦闘
- #@21 &if(%direc<0 and 警備1==0){
- %mandef(20)={$B,0,$60,2,0} //警備
- %mandef(21)={$B,0,$60,2,0} //警備
- &on
- !o(1)j(2)警備兵j(0);お前達、侵入者だな!pc
- !o(1)j(2)警備兵j(0);これ以上は進ませんぞっ!pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(このまま、突っ込む)p
- !o(1)j(2)カリスj(0);来るぞ。w;ルシェル、君は無理しなくていいから
- !な。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);は、wはいっ!pc
- &manmove 21,2,2
- &manmove 20,2,2
- &manmove 21,2,2
- &manmove 20,2,2
- &partymove 8,8,8,8
- &patternpal GR\CG3.PAL //モンスター用パレット
- &bgm 0
- &pcm 9
-
- &battle $1000,14,42,1,43,1
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &bgm 19
- &patternpal GR\CG.PAL //CG用パレット
- 警備1=1
- %mandef(20)={$B,0,$00,2,-1} //警備
- %mandef(21)={$B,0,$00,2,-1} //警備
- %manpoint(20)={1000,1000}
- %manpoint(21)={1000,1000}
- &on
- }
-
- //F4戦闘
- #@22 &if(%direc<0 and 警備2==0){
- %mandef(26)={$B,0,$60,2,0} //警備
- %mandef(27)={$B,0,$60,2,0} //警備
- &on
- &if(%px<145){
- &manmove 26,-4
- &manmove 27,-4
- }&else{
- &manmove 26,-6
- &manmove 27,-6
- }
- !o(1)j(2)警備兵j(0);なんだきさまらはっ!pc
- !o(1)j(2)警備兵j(0);ん、曲者かっ!pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);くそっ!pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);来ますっ!pc
- &if(%px<145){
- &manmove 26,4,4,4,4
- &manmove 27,4,4,4,4,4,4,4,4
- }&else{
- &manmove 26,6,6,6,6,6,6,6,6
- &manmove 27,6,6,6,6
- }
- &patternpal GR\CG3.PAL //モンスター用パレット
- &bgm 0
- &pcm 9
-
- &battle $1000,14,41,1,42,1
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &bgm 19
- &patternpal GR\CG.PAL //CG用パレット
- 警備2=1
- %mandef(26)={$B,0,$00,2,-1} //警備
- %mandef(27)={$B,0,$00,2,-1} //警備
- %manpoint(26)={1000,1000}
- %manpoint(27)={1000,1000}
- &on
- }
-
- #@49 //敵出現
- &if(敵出現==1){&&} //デバックモード
- &if(警報==0){&&} //
- &if(%direc>=0){&&} //イベント上でボタンが押されたら処理中断
- &if(%rnd(100)<80){&&} //乱数が80より小さければ処理中断
- &if(%systime<80){&&} //前回の戦闘から80ターン経っていなければ処理中断
-
- &if(発見==0){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);気付かれたか!pc
- 発見=1
- }
- 敵確率1=%rnd(100)
- &patternpal GR\CG3.PAL //モンスター用パレット
- &if(進行==22){&partyout 12}
- &bgm 0
- &pcm 9
-
- &if(進行==22){
- &if(敵確率1>=0 and 敵確率1<25 ){&battle 0,14,ドーベルマン,1+%rnd(3)}
- &if(敵確率1>=25 and 敵確率1<50 ){&battle 0,14,41,1,42,%rnd(2)}
- &if(敵確率1>=50 and 敵確率1<75 ){&battle 0,14,42,1,43,%rnd(2)}
- &if(敵確率1>=75 and 敵確率1<100){&battle 0,14,43,1,41,%rnd(2)}
- }&else{
- &if(敵確率1>=0 and 敵確率1<25 ){&battle 0,14,ドーベルマン,2+%rnd(2)}
- &if(敵確率1>=25 and 敵確率1<50 ){&battle 0,14,41,1,42,1,43,%rnd(2)}
- &if(敵確率1>=50 and 敵確率1<75 ){&battle 0,14,41,1,42,%rnd(2),43,1}
- &if(敵確率1>=75 and 敵確率1<100){&battle 0,14,44,1,45,%rnd(2)}
- }
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &bgm 19
- &if(進行==22){
- &partyin 12
- &on
- }
- &patternpal GR\CG.PAL //CG用パレット
-
- %systime=0
-
- &&
-
- //━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
- [DUN3]//アンヌ森林
- &bgm 20
- &partyspeed 2
- &sppsp CHR\DUN3.SPP
- &map MAP\DUN3.MAP //マップの設定
- &mapsp MAP\DUN3.SP //BGの設定
- &mappal MAP\DUN3.PAL //BGパレットの設定
- %partypoint={29,250,-8}
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- &if(宝3==0){
- %mandef(1)={$A , 0,$40, 2, -1} //宝箱
- }&else{
- %mandef(1)={$A , 0,$43, 2, -1} //宝箱
- }
-
-
- &on
-
-
- #1 &if(宝3==0){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ん?w;宝箱?pc
- &pcm 18
- %mandef(1)={$A , 0,$41, 2, -1} //宝箱
- &wait 5
- &on
- %mandef(1)={$A , 0,$42, 2, -1} //宝箱
- &wait 5
- &on
- %mandef(1)={$A , 0,$43, 2, -1} //宝箱
- &wait 5
- &on
- &wait 20
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ロープ?p
- !o(1)j(2)カリスj(0);…メモが入ってるな。;p
- !o(1)j(2)カリスj(0);【ラッキー!! これで動物がもう10匹
- !多く捕まえられるよ!】;p
- !o(1)j(2)カリスj(0);ラ、ラッキーって…。w;まあいいもらって
- !おこう。pc
- &pcm 10
- !o(1);j(2)魔法のロープj(0)を入手!pc
- 宝3=1
- 魔法のロープ++
- }
-
- #@0 &if(%direc<0){&goto2 FIELD,45,106,2}
-
- #@1 &if(%direc<0){
- &if(進行==31){
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);…人っ!pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);例の救世騎士団のやつらみたいだな。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);うっ…、wこんなぁ…。;wwひ、wひどい…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);何が出てくるか判からない。;無理しないで戻って
- !もいいんだぜ。pc
- &wait 20
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);だ、wだいじょうぶです。;私行きます。pc
- 進行=32
- }
- }
-
- #@2 &if(%direc<0){&goto DUN3B}
-
- #@3 &if(%direc<0 and 怪獣==0){
- &pcm 27
- &wait 200
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);これって前に聞いたっ!pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、どうやら奥の方にいるらしいな。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);大丈夫でしょうか。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);無駄に戦わずに済めばいいんだが。pc
- 怪獣=1
- }
-
- #@4 &if(%direc<0 and 怪獣==1){
- &pcm 28
- &wait 200
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);どうやら、この先に化け物がいるみたいだな。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);薬草も…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);だろうな…。p
- !o(1)j(2)カリスj(0);(ちっ、どうしてこう都合が悪いんだ)p
- !o(1)j(2)カリスj(0);ま、とにかく行ってみよう。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);は、wはい。p
- !o(1)j(2)ルシェルj(0);(たぶんメシア様も。;どうかご無事でいて下さい)pc
- 怪獣=2
- }
-
- #@49 //敵出現
- &if(敵出現==1){&&} //デバックモード
- &if(%direc>=0){&&} //イベント上でボタンが押されたら処理中断
- &if(%rnd(100)<80){&&} //乱数が80より小さければ処理中断
- &if(%systime<80){&&} //前回の戦闘から80ターン経っていなければ処理中断
-
- 敵確率1=%rnd(100)
- &patternpal GR\CG3.PAL //モンスター用パレット
- &bgm 0
- &pcm 9
- &if(敵確率1>=0 and 敵確率1<25 ){&battle 0,14,マンティコア,1+%rnd(2)}
- &if(敵確率1>=25 and 敵確率1<50 ){&battle 0,14,ケルピー,1+%rnd(2)}
- &if(敵確率1>=50 and 敵確率1<75 ){&battle 0,14,ムシュフシュ,1+%rnd(2)}
- &if(敵確率1>=75 and 敵確率1<100){&battle 0,14,シェロブ,1+%rnd(2)}
- &patternpal GR\CG.PAL //CG用パレット
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &bgm 20
- %systime=0
-
-
- //━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
- [DUN3B]//アンヌ森林 メシアVS魔獣アヌバ
- &partyset 1
- &bgm 23
- &map MAP\DUN3B.MAP //マップの設定
- %partypoint={0,10,-8}
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1) ={$9 , 0,$20, 8, -1} //カリス
- %mandef(3) ={$B , 0,$80, 8, -1} //ルシェル
- %mandef(4) ={$C , 0,$44, 2, -1} //アゼル
- %mandef(5) ={$C , 0,$46, 2, -1} //ダリア
- %mandef(13)={$C , 0,$45, 2, -1} //剣
- %mandef(6) ={$5 , 1,$00, 2, -1} //アヌバ
- %mandef(7) ={$5 , 1,$08, 2, -1} //アヌバ
- %mandef(8) ={$5 , 1,$20, 2, -1} //アヌバ
- %mandef(9) ={$5 , 1,$28, 2, -1} //アヌバ
- %mandef(10)={$5 , 1,$40, 2, -1} //アヌバ
- %mandef(11)={$5 , 1,$48, 2, -1} //アヌバ
- %mandef(12)={$5 , 1,$60, 2, -1} //アヌバ
-
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);な、wなんなんだ、あの化け物は。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);あそこのお二人はっ、メシア様!pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);メシア…。pc
-
- &monsprint 24,32,アゼル
- !o(1)j(2)メシア男j(0);…そろそろ限界だな。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)メシア女j(0);…まあね、でも向こうも同じみたい。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)メシア男j(0);次で終わりってとこか。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)メシア女j(0);どっちかがね…。pc
-
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);カリスさん、加勢しなきゃ!pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ん、wああ。pc
- %mandef(1) ={$9 , 0,$20, 8, 0} //カリス
- &on
- &manmove 1,8,8
- %mandef(6) ={$5 , 1,$01, 2, -1} //アヌバ
- %mandef(7) ={$5 , 1,$09, 2, -1} //アヌバ
- %mandef(8) ={$5 , 1,$21, 2, -1} //アヌバ
- %mandef(9) ={$5 , 1,$29, 2, -1} //アヌバ
- %mandef(10)={$5 , 1,$41, 2, -1} //アヌバ
- %mandef(11)={$5 , 1,$49, 2, -1} //アヌバ
- &on
- &manmove 1,8
- &pcm 29
- %mandef(7) ={$5 , 1,$0A, 2, -1} //アヌバ
- %mandef(10)={$5 , 1,$42, 2, -1} //アヌバ
- %mandef(1) ={$9 , 0,$20, 8, -1} //カリス
- &on
-
- &monsprint 24,32,アゼル
- !o(1)j(2)メシア男j(0);(チャンスだ!)pc
- &monsprint 24,32,ダリア
- !o(1)j(2)メシア女j(0);(いくよ兄貴!)pc
-
- &wait 20
- &monsprint 88,40,戦い_01
- %manpoint(4)={100,100}
- %manpoint(5)={100,100}
- %manpoint(13)={100,100}
- &on
- &monsprint 88,40,戦い_02
- &wait 6
- &monsprint 88,40,戦い_03
- &wait 6
- &monsprint 88,40,戦い_04
- &wait 6
- &monsprint 88,40,戦い_05
- %mandef(7) ={$5 , 1,$0B, 2, -1} //アヌバ
- %mandef(10)={$5 , 1,$43, 2, -1} //アヌバ
- &on
- &monsprint 88,40,戦い_06
- &wait 6
- &monsprint 88,40,戦い_07
- &wait 6
- &monsprint 88,40,戦い_08
- &wait 6
- &monsprint 88,40,戦い_09
- &wait 6
- &monsprint 88,40,戦い_10
- &wait 6
- &monsprint 88,40,戦い_11
- &pcm 22
- &pcm 30
- %mandef(6) ={$5 , 1,$02, 2, -1} //アヌバ
- %mandef(7) ={$5 , 1,$0C, 2, -1} //アヌバ
- %mandef(8) ={$5 , 1,$22, 2, -1} //アヌバ
- %mandef(9) ={$5 , 1,$2A, 2, -1} //アヌバ
- %mandef(10)={$5 , 1,$44, 2, -1} //アヌバ
- %mandef(11)={$5 , 1,$4A, 2, -1} //アヌバ
- %mandef(12)={$5 , 1,$61, 2, -1} //アヌバ
- &on
- &monsprint 88,40,戦い_12
- &wait 6
- &monsprint 88,40,戦い_13
- &wait 6
- &monsprint 88,40,戦い_14
- &wait 6
- &monsprint 88,40,戦い_15
- &wait 6
- &monsprint 88,40,戦い_16
- &wait 6
- &monsprint 88,40,戦い_17
- &wait 6
- &monsprint 88,40,戦い_18
- &wait 6
- &monsprint 88,40,戦い_19
- &wait 6
- &monsprint 88,40,戦い_20
- &pcm 23
- &pcm 31
- %mandef(7) ={$5 , 1,$0D, 2, -1} //アヌバ
- %mandef(10)={$5 , 1,$45, 2, -1} //アヌバ
- &on
- &monsprint 88,40,戦い_21
- &wait 6
- &monsprint 88,40,戦い_22
- &wait 6
- &monsprint 88,40,戦い_23
- &wait 6
- &monsprint 88,40,戦い_24
- &wait 6
- &monsprint 88,40,戦い_25
- %mandef(7) ={$5 , 1,$0E, 2, -1} //アヌバ
- %mandef(10)={$5 , 1,$46, 2, -1} //アヌバ
- &on
- &monsprint 88,40,戦い_26
- &wait 6
- &monsprint 88,40,戦い_27
- &wait 6
- &monsprint 88,40,戦い_28
- &wait 6
- &monsprint 88,40,戦い_29
- &wait 6
- &monsprint 88,40,戦い_30
- %mandef(6) ={$5 , 1,$03, 2, -1} //アヌバ
- %mandef(7) ={$5 , 1,$0F, 2, -1} //アヌバ
- %mandef(8) ={$5 , 1,$23, 2, -1} //アヌバ
- %mandef(9) ={$5 , 1,$2B, 2, -1} //アヌバ
- %mandef(10)={$5 , 1,$47, 2, -1} //アヌバ
- %mandef(11)={$5 , 1,$4B, 2, -1} //アヌバ
- %mandef(12)={$5 , 1,$62, 2, -1} //アヌバ
- &on
- &monsprint 88,40,戦い_31
- &wait 6
- &monsprint 88,40,戦い_32
- &wait 6
- &monsprint 88,40,戦い_33
- &wait 6
- &monsprint 88,40,戦い_34
- &wait 6
- &monsprint 88,40,戦い_35
- %mandef(6) ={$5 , 1,$04, 2, -1} //アヌバ
- %mandef(7) ={$5 , 1,$06, 2, -1} //アヌバ
- %mandef(8) ={$5 , 1,$24, 2, -1} //アヌバ
- %mandef(9) ={$5 , 1,$2C, 2, -1} //アヌバ
- %mandef(10)={$5 , 1,$27, 2, -1} //アヌバ
- %mandef(11)={$5 , 1,$4C, 2, -1} //アヌバ
- %mandef(12)={$5 , 1,$63, 2, -1} //アヌバ
- &on
- &wait 20
- %mandef(6) ={$5 , 1,$05, 2, -1} //アヌバ
- %mandef(7) ={$5 , 1,$07, 2, -1} //アヌバ
- %mandef(8) ={$5 , 1,$25, 2, -1} //アヌバ
- %mandef(9) ={$5 , 1,$2D, 2, -1} //アヌバ
- %mandef(10)={$5 , 1,$67, 2, -1} //アヌバ
- %mandef(11)={$5 , 1,$4D, 2, -1} //アヌバ
- %mandef(12)={$5 , 1,$64, 2, -1} //アヌバ
- &on
- &wait 20
- &pcm 33
- %manpoint(6)={100,100}
- %manpoint(7)={100,100}
- %mandef(8) ={$5 , 1,$26, 2, -1} //アヌバ
- %mandef(9) ={$5 , 1,$2E, 2, -1} //アヌバ
- %mandef(10)={$5 , 1,$68, 2, -1} //アヌバ
- %mandef(11)={$5 , 1,$4E, 2, -1} //アヌバ
- %mandef(12)={$5 , 1,$65, 2, -1} //アヌバ
- &on
- &wait 20
- %manpoint(8)={100,100}
- %mandef(9) ={$5 , 1,$2F, 2, -1} //アヌバ
- %mandef(10)={$5 , 1,$69, 2, -1} //アヌバ
- %mandef(11)={$5 , 1,$4F, 2, -1} //アヌバ
- %mandef(12)={$5 , 1,$66, 2, -1} //アヌバ
- &on
- &wait 150
-
- &monsprint 88,40,戦い_36
- &wait 20
- &monsprint 88,40,戦い_37
- &wait 20
- &monsprint 88,40,戦い_38
- &wait 20
-
- %mandef(4) ={$C , 0,$47, 2, -1} //アゼル&ダリア
- %mandef(5) ={$C , 0,$48, 2, -1} //アゼル&ダリア
- %mandef(13)={$C , 0,$49, 2, -1} //アゼル&ダリア
- %manpoint(4)={13,17}
- %manpoint(5)={15,17}
- %manpoint(13)={17,17}
- &on
- &monsprint 88,40,消し
- &wait 50
- &monsprint 24,32,アゼル
- !o(1)j(2)メシア男j(0);妹君よ素晴らしい切り込みだ。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)メシア女j(0);いえいえ兄上こそ、お見事!pc
- &monsprint 24,32,アゼル
- !o(1)j(2)メシア男j(0);ふぅ…。w;さて、どうする。;もうこれ以上動けない
- !ぜ。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)メシア女j(0);そ、wそうね、どうしよ。p;
- !救世主、魔の森の魔物との戦いにて死す。;うーん、私の死に
- !場所にしちゃあ、舞台が地味よねぇ…。pc
-
- %mandef(3) ={$B , 0,$80, 8, 1} //ルシェル
- &on
- &manmove 3,8,8,8,8,8,8,8,8
- %mandef(3) ={$B , 0,$80, 8, -1} //ルシェル
- &on
-
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);メシア様ー、大丈夫ですかっ!pc
- %mandef(1) ={$9 , 0,$20, 8, 0} //カリス
- &on
- &manmove 1,8,8,8,8
- %mandef(1) ={$9 , 0,$20, 8, -1} //カリス
- &on
- &monsprint 24,32,アゼル
- !o(1)j(2)メシア男j(0);やばっ、女の子の声が聴こえてくるや。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)メシア女j(0);フフ。w;天使のお出迎えじゃないの。pc
- %mandef(3) ={$B , 0,$80, 8, 0} //ルシェル
- &on
- &manmove 3,8,8
- %mandef(3) ={$B , 0,$80, 8, -1} //ルシェル
- &on
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);しっかりして下さいっ。;今、手当します。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)メシア男j(0);助け、wなのか?pc
- &monsprint 24,32,ダリア
- !o(1)j(2)メシア女j(0);みたいね…。pc
- &pcm 32
- %mandef(12)={$5 , 1,$6A, 2, -1} //アヌバ
- %mandef(7) ={$5 , 1,$80, 2, 0} //アヌバ
- %manpoint(7)={15,13}
- &on
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);きゃっ!w;魔物がっ!pc
- &monsprint 24,32,アゼル
- !o(1)j(2)メシア男j(0);ちっ、wしつこいねぇ…
- %mandef(4) ={$C , 0,$4A, 2, -1} //アゼル&ダリア
- %mandef(5) ={$C , 0,$4B, 2, -1} //アゼル&ダリア
- &on
- !うっ!pc
- %mandef(4) ={$C , 0,$47, 2, -1} //アゼル&ダリア
- %mandef(5) ={$C , 0,$48, 2, -1} //アゼル&ダリア
- &on
- &monsprint 24,32,ダリア
- !o(1)j(2)メシア女j(0);兄貴、救世主様でしょ。;だらしないわよ…ふんっ、
- %mandef(5) ={$C , 0,$4C, 2, -1} //アゼル&ダリア
- %mandef(13)={$C , 0,$4D, 2, -1} //アゼル&ダリア
- &on
- !wはぁっ!pc
- %mandef(5) ={$C , 0,$48, 2, -1} //アゼル&ダリア
- %mandef(13)={$C , 0,$49, 2, -1} //アゼル&ダリア
- &on
- &monsprint 24,32,アゼル
- !o(1)j(2)メシア男j(0);…おい、wひとのこと言えてないぞ。pc
- %mandef(1) ={$9 , 0,$20, 8, 0} //カリス
- &on
- &manmove 1,8,8
- %mandef(1) ={$9 , 0,$20, 8, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ルシェル、二人を。pc
- %mandef(3) ={$B , 0,$80, 8, 0} //ルシェル
- &on
- &manmove 3,-6
- %mandef(3) ={$B , 0,$80, 8, -1} //ルシェル
- &on
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);カリスさん一人じゃ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);死にぞこないだ。;一人で充分だよ。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)メシア男j(0);(死にぞこないだから厄介なんだぜ…)pc
-
- %mandef(1) ={$9 , 0,$20, 8, 0} //カリス
- &on
- &manmove 1,8,8
- %mandef(1) ={$9 , 0,$20, 8, -1} //カリス
- %mandef(3) ={$B , 0,$80, 8, 0} //ルシェル
- &on
- &manmove 3,-8
- %mandef(3) ={$B , 0,$80, 8, -1} //ルシェル
- %mandef(1) ={$9 , 0,$20, 8, 1} //カリス
- &on
- &manmove 1,6,6,6,8,8,8,8,4,4,4,4,8
- %mandef(1) ={$9 , 0,$20, 8, -1} //カリス
- &on
-
- &on
- &patternpal GR\CG3.PAL //モンスター用パレット
- &bgm 0
- &pcm 9
-
- &battle 0,14,魔獣アヌバ,1
- &patternpal GR\CG.PAL //CG用パレット
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &bgm 20
- %mandef(7) ={$5 , 1,$6B, 2, -1} //アヌバ
- &on
-
-
- &contrast 0
- &wait 300
- %mandef(3) ={$B , 0,$80, 8, -1} //ルシェル
- %mandef(14)={$9 , 0,$20, 2, -1} //カリス
- %mandef(15)={$C , 0,$A0, 2, -1} //アゼル
- %mandef(16)={$C , 0,$C0, 2, -1} //ダリア
- %manpoint(1)={100,100}
- %manpoint(4)={100,100}
- %manpoint(5)={100,100}
- %manpoint(13)={100,100}
- %manpoint(3)={15,20}
- %manpoint(14)={16,15}
- %manpoint(15)={13,18}
- %manpoint(16)={17,18}
- &on
- &contrast 15
-
- &monsprint 24,32,アゼル
- !o(1)j(2)メシア男j(0);ほんと助かったよ。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)メシア女j(0);だけど、少年少女ってあなた達いったい。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);別にあんた達を助けたのはついでだ。;
- %mandef(15)={$C , 0,$A0, 2, 0} //アゼル
- &on
- &manmove 15,-6
- %mandef(15)={$C , 0,$A0, 2, -1} //アゼル
- %mandef(16)={$C , 0,$C0, 2, 0} //ダリア
- &on
- &manmove 16,-8
- %mandef(16)={$C , 0,$C0, 2, -1} //ダリア
- &on
- !オレ達の目的はここらへんにある薬草の採取なんでね。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);失礼ですよ。p;
- %mandef(15)={$C , 0,$A0, 2, 0} //アゼル
- &on
- &manmove 15,-2
- %mandef(15)={$C , 0,$A0, 2, -1} //アゼル
- %mandef(16)={$C , 0,$C0, 2, 0} //ダリア
- &on
- &manmove 16,-2
- %mandef(16)={$C , 0,$C0, 2, -1} //ダリア
- &on
- !あの私、ルシェルと言います。;
- !メシア様にお会い出来るなんて、とても光栄です。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)メシア男j(0);…オルトン教徒か。p;メシア様ってのはやめて
- !くれアゼルでいいよ。w;ルシェル。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)メシア女j(0);私もダリアでいいわ。;ありがとうルシェル。w;
- %mandef(16)={$C , 0,$C0, 2, 0} //ダリア
- &on
- &manmove 16,-8
- %mandef(16)={$C , 0,$C0, 2, -1} //ダリア
- &on
- !それと…。pc
- %mandef(15)={$C , 0,$A0, 2, 0} //アゼル
- &on
- &manmove 15,-6
- %mandef(15)={$C , 0,$A0, 2, -1} //アゼル
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…カリスだ。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);ありがとう、カリス。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);とんでもありません。;
- %mandef(15)={$C , 0,$A0, 2, 0} //アゼル
- &on
- &manmove 15,-2
- %mandef(15)={$C , 0,$A0, 2, -1} //アゼル
- %mandef(16)={$C , 0,$C0, 2, 0} //ダリア
- &on
- &manmove 16,-2
- %mandef(16)={$C , 0,$C0, 2, -1} //ダリア
- &on
- !人々を、世界を平和に導
- !くメシア様のお役に立てるなんて…。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);(ふっ、世界平和ね…)pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);(部下を全滅させて…、救世主だなんて)pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);(焦りすぎた…、完全に指揮官失格だ)pc
- %mandef(14)={$9 , 0,$20, 2, 0} //カリス
- &on
- &manmove 14,6,6,6,8,8,8,8,8,8,8,4,4,4,4,8,-8
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);あった、これだ。pc
- %mandef(14)={$9 , 0,$20, 2, -1} //カリス
- %mandef(15)={$C , 0,$A0, 2, 0} //アゼル
- &on
- &manmove 15,-8
- %mandef(15)={$C , 0,$A0, 2, -1} //アゼル
- %mandef(16)={$C , 0,$C0, 2, 0} //ダリア
- &on
- &manmove 16,-8
- %mandef(16)={$C , 0,$C0, 2, -1} //ダリア
- &on
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);どうしたんですか?pc
- %mandef(14)={$9 , 0,$20, 2, 0} //カリス
- &on
- &manmove 14,-2
- %mandef(14)={$9 , 0,$20, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…薬草だよ、さあ急いで戻ろう。;リアナが待って
- !る。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);あっ!w;…はい。p
- !o(1)j(2)ルシェルj(0);(私ったら、つい興奮してリアナさんのことを
- !忘れてた…)pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);カリス、もしよかったら僕らも町まで同行させて
- !くれないか。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);構わないぜ。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);フフ。w;じゃあ、行きましょう。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…。pc
-
- 進行=33
- &partyset 1,4,5,6
- &contrast 0
- &wait 200
- &goto2 FIELD,45,106,2
-
- //━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
- [DUN4]//砂漠の霧
- &bgm 21
- &sppsp CHR\DUN3.SPP
- &map MAP\DUN4.MAP //マップの設定
- &mapsp MAP\DUN4.SP //BGの設定
- &mappal MAP\DUN4.PAL //BGパレットの設定
- %partypoint={47,2,2}
- &partyspeed 1
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1)={$8 , 0,$60, 2, 0} //影
- %mandef(2)={$8 , 0,$64, 2, 0} //影
- %mandef(3)={$8 , 0,$60, 2, 0} //影
- %mandef(4)={$8 , 0,$64, 2, 0} //影
- %mandef(5)={$8 , 0,$60, 2, 0} //影
- %mandef(6)={$8 , 0,$64, 2, 0} //影
- %mandef(7)={$8 , 0,$60, 2, 0} //影
- %mandef(8)={$8 , 0,$64, 2, 0} //影
- &if(宝4==0){
- %mandef(9)={$A , 0,$40, 2, -1} //宝箱
- }&else{
- %mandef(9)={$A , 0,$43, 2, -1} //宝箱
- }
- &if(封印1==1){
- %manpoint(1)={1000,1000}
- %manpoint(2)={1000,1000}
- }
- &if(封印2==1){
- %manpoint(3)={1000,1000}
- %manpoint(4)={1000,1000}
- }
- &if(封印3==1){
- %manpoint(5)={1000,1000}
- %manpoint(6)={1000,1000}
- }
- &if(封印4==1){
- %manpoint(7)={1000,1000}
- %manpoint(8)={1000,1000}
- }
-
- &on
- &if(進行==35){
- &partymove 2,2,2,2,2,2,2,-2
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);ふう、だいぶ霧が濃くなってきたな。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);どうする。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);何が出てくるかわからない、慎重に歩いていこう。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);これ…。;w結界、wのようね。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);結界?pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);たぶん魔導師の…。w;いいえもっと強力だわ。;
- !普通の魔導師じゃない。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);魔物の次は魔導師のたぐいか。p;結界とい
- !うことはこの奥に何かがあるわけだな。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);でも、進めば進むほど、私たちを阻んでくるわ。p
- !;とにかく気を強く持って進みましょう。;そうすれば結界の中
- !に入れるはずだわ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);気を強くって、どういう?pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);自分が成すべきこと、目的を強く念じながら進め
- !ばいい。p;その思いが強い程、阻むものを打ち破るってわけさ。
- !pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);ま、ちょっと違うけど、判かり易く言えばそうい
- !うことよ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);判かった、オレの目的か…。p
- !o(1)j(2)カリスj(0);(東大陸、リザレアに行き、オレ自身を手に入れ
- !る!)pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);さ、進もう。pc
- 進行=36
- &on
- }
-
-
- #9 &if(宝4==0){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ん?w;宝箱?pc
- &pcm 18
- %mandef(9)={$A , 0,$41, 2, -1} //宝箱
- &wait 5
- &on
- %mandef(9)={$A , 0,$42, 2, -1} //宝箱
- &wait 5
- &on
- %mandef(9)={$A , 0,$43, 2, -1} //宝箱
- &wait 5
- &on
- &wait 20
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ロープ?p
- !o(1)j(2)カリスj(0);…メモが入ってるな。;p
- !o(1)j(2)カリスj(0);【ラッキー!! これで動物がもう10匹
- !多く捕まえられるよ!】;p
- !o(1)j(2)カリスj(0);ラ、ラッキーって…。w;まあいいもらって
- !おこう。pc
- &pcm 10
- !o(1);j(2)魔法のロープj(0)を入手!pc
- 宝4=1
- 魔法のロープ++
- }
-
- #@0 &if(%direc<0){&goto2 FIELD,44,146,2}
-
- #@1 // 結界の中心へ
- &if(%direc<0){&goto IV20}
-
- #@7 &if(%direc<0 and 解除<5){
- &pcm 36
- &partymove 8,8
- &partymove -2
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);なんだ!pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);この先は結界がより強くなっているわ。;
- !並大抵のことじゃ入れない。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);だが、おそらくこの先に怪奇の原因があるはずだ。p;
- !なんとか手立てを考えて突破しなくては。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);そうね。;もう少し周辺を探ってみましょう。;
- !きっと何か方法があるはずよ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、そうしよう。pc
- }
-
- #@2// 敵が出現
- &if(%direc<0 and 進行==36){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);殺気…。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);ただ念じて歩くだけとは行かないみたいだな。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);やっぱり素直に通してくれないわよね。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);仕方無いさ。;さあ、来るぞ!pc
-
- &patternpal GR\CG3.PAL //モンスター用パレット
- &bgm 0
- &pcm 9
-
- &battle $1000,14,53,1,54,1,55,1
- &patternpal GR\CG.PAL //CG用パレット
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &bgm 21
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);今の敵!pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);オレ達の姿だったな。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);おそらく、魔導師の術のたぐいだと思うわ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ちっ、厄介だな。pc
- 進行=37
- %systime=0
- }
-
- #@3// 出現
- &if(封印1==0){
- &jsr 封印解除
- 解除++
- &patternpal GR\CG3.PAL //モンスター用パレット
- &bgm 0
- &pcm 9
-
- &battle $1000,14,56,1
- &patternpal GR\CG.PAL //CG用パレット
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &bgm 21
- %mandef(1)={$8 , 0,$00, 2, 0} //影
- %mandef(2)={$8 , 0,$00, 2, 0} //影
- &on
- &wait 10
- %mandef(1)={$8 , 0,$60, 2, 0} //影
- %mandef(2)={$8 , 0,$64, 2, 0} //影
- &on
- &wait 50
- %mandef(1)={$8 , 0,$00, 2, 0} //影
- %mandef(2)={$8 , 0,$00, 2, 0} //影
- &on
- &wait 25
- %mandef(1)={$8 , 0,$60, 2, 0} //影
- %mandef(2)={$8 , 0,$64, 2, 0} //影
- &on
- &wait 40
- %mandef(1)={$8 , 0,$00, 2, 0} //影
- %mandef(2)={$8 , 0,$00, 2, 0} //影
- &on
- &wait 40
- %mandef(1)={$8 , 0,$60, 2, 0} //影
- %mandef(2)={$8 , 0,$64, 2, 0} //影
- &on
- &wait 25
- %mandef(1)={$8 , 0,$00, 2, 0} //影
- %mandef(2)={$8 , 0,$00, 2, 0} //影
- &on
- &wait 50
- %mandef(1)={$8 , 0,$60, 2, 0} //影
- %mandef(2)={$8 , 0,$64, 2, 0} //影
- &on
- &wait 10
- %manpoint(1)={1000,1000}
- %manpoint(2)={1000,1000}
- &on
- 封印1=1
- &if(解除==4){&jmp 解除完了}
- %systime=0
- }
- #@4// 出現
- &if(封印2==0){
- &jsr 封印解除
- 解除++
- &patternpal GR\CG3.PAL //モンスター用パレット
- &bgm 0
- &pcm 9
-
- &battle $1000,14,57,1
- &patternpal GR\CG.PAL //CG用パレット
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &bgm 21
- %mandef(3)={$8 , 0,$00, 2, 0} //影
- %mandef(4)={$8 , 0,$00, 2, 0} //影
- &on
- &wait 10
- %mandef(3)={$8 , 0,$60, 2, 0} //影
- %mandef(4)={$8 , 0,$64, 2, 0} //影
- &on
- &wait 50
- %mandef(3)={$8 , 0,$00, 2, 0} //影
- %mandef(4)={$8 , 0,$00, 2, 0} //影
- &on
- &wait 25
- %mandef(3)={$8 , 0,$60, 2, 0} //影
- %mandef(4)={$8 , 0,$64, 2, 0} //影
- &on
- &wait 40
- %mandef(3)={$8 , 0,$00, 2, 0} //影
- %mandef(4)={$8 , 0,$00, 2, 0} //影
- &on
- &wait 40
- %mandef(3)={$8 , 0,$60, 2, 0} //影
- %mandef(4)={$8 , 0,$64, 2, 0} //影
- &on
- &wait 25
- %mandef(3)={$8 , 0,$00, 2, 0} //影
- %mandef(4)={$8 , 0,$00, 2, 0} //影
- &on
- &wait 50
- %mandef(3)={$8 , 0,$60, 2, 0} //影
- %mandef(4)={$8 , 0,$64, 2, 0} //影
- &on
- &wait 10
- %manpoint(3)={1000,1000}
- %manpoint(4)={1000,1000}
- &on
- &if(解除==4){&jmp 解除完了}
- 封印2=1
- %systime=0
- }
- #@5// 出現
- &if(封印3==0){
- &jsr 封印解除
- 解除++
- &patternpal GR\CG3.PAL //モンスター用パレット
- &bgm 0
- &pcm 9
-
- &battle $1000,14,58,1
- &patternpal GR\CG.PAL //CG用パレット
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &bgm 21
- %mandef(5)={$8 , 0,$00, 2, 0} //影
- %mandef(6)={$8 , 0,$00, 2, 0} //影
- &on
- &wait 10
- %mandef(5)={$8 , 0,$60, 2, 0} //影
- %mandef(6)={$8 , 0,$64, 2, 0} //影
- &on
- &wait 50
- %mandef(5)={$8 , 0,$00, 2, 0} //影
- %mandef(6)={$8 , 0,$00, 2, 0} //影
- &on
- &wait 25
- %mandef(5)={$8 , 0,$60, 2, 0} //影
- %mandef(6)={$8 , 0,$64, 2, 0} //影
- &on
- &wait 40
- %mandef(5)={$8 , 0,$00, 2, 0} //影
- %mandef(6)={$8 , 0,$00, 2, 0} //影
- &on
- &wait 40
- %mandef(5)={$8 , 0,$60, 2, 0} //影
- %mandef(6)={$8 , 0,$64, 2, 0} //影
- &on
- &wait 25
- %mandef(5)={$8 , 0,$00, 2, 0} //影
- %mandef(6)={$8 , 0,$00, 2, 0} //影
- &on
- &wait 50
- %mandef(5)={$8 , 0,$60, 2, 0} //影
- %mandef(6)={$8 , 0,$64, 2, 0} //影
- &on
- &wait 10
- %manpoint(5)={1000,1000}
- %manpoint(6)={1000,1000}
- &on
- 封印3=1
- &if(解除==4){&jmp 解除完了}
- %systime=0
- }
-
- #@6// 出現
- &if(封印4==0){
- &jsr 封印解除
- 解除++
- &patternpal GR\CG3.PAL //モンスター用パレット
- &bgm 0
- &pcm 9
-
- &battle $1000,14,59,1
- &patternpal GR\CG.PAL //CG用パレット
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &bgm 21
- %mandef(7)={$8 , 0,$00, 2, 0} //影
- %mandef(8)={$8 , 0,$00, 2, 0} //影
- &on
- &wait 10
- %mandef(7)={$8 , 0,$60, 2, 0} //影
- %mandef(8)={$8 , 0,$64, 2, 0} //影
- &on
- &wait 50
- %mandef(7)={$8 , 0,$00, 2, 0} //影
- %mandef(8)={$8 , 0,$00, 2, 0} //影
- &on
- &wait 25
- %mandef(7)={$8 , 0,$60, 2, 0} //影
- %mandef(8)={$8 , 0,$64, 2, 0} //影
- &on
- &wait 40
- %mandef(7)={$8 , 0,$00, 2, 0} //影
- %mandef(8)={$8 , 0,$00, 2, 0} //影
- &on
- &wait 40
- %mandef(7)={$8 , 0,$60, 2, 0} //影
- %mandef(8)={$8 , 0,$64, 2, 0} //影
- &on
- &wait 25
- %mandef(7)={$8 , 0,$00, 2, 0} //影
- %mandef(8)={$8 , 0,$00, 2, 0} //影
- &on
- &wait 50
- %mandef(7)={$8 , 0,$60, 2, 0} //影
- %mandef(8)={$8 , 0,$64, 2, 0} //影
- &on
- &wait 10
- %manpoint(7)={1000,1000}
- %manpoint(8)={1000,1000}
- &on
- &if(解除==4){&jmp 解除完了}
- 封印4=1
- %systime=0
- }
-
- #@49 //敵出現
- &if(敵出現==1){&&} //デバックモード
- &if(%direc>=0){&&} //イベント上でボタンが押されたら処理中断
- &if(%rnd(100)<80){&&} //乱数が80より小さければ処理中断
- &if(%systime<80){&&} //前回の戦闘から80ターン経っていなければ処理中断
-
- 敵確率1=%rnd(100)
- &patternpal GR\CG3.PAL //モンスター用パレット
- &bgm 0
- &pcm 9
-
- &if(敵確率1>=0 and 敵確率1<25 ){&battle 0,14,53,1,54,%rnd(2),55,%rnd(2)}
- &if(敵確率1>=25 and 敵確率1<50 ){&battle 0,14,53,%rnd(2),54,1,55,%rnd(2)}
- &if(敵確率1>=50 and 敵確率1<75 ){&battle 0,14,53,%rnd(2),54,%rnd(2),55,1}
- &if(敵確率1>=75 and 敵確率1<100){&battle 0,14,53,1,54,1,55,1}
- &patternpal GR\CG.PAL //CG用パレット
-
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &bgm 21
- %systime=0
- &&
-
- &label 封印解除
- &if(解除==0){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);なんだこれは、敵?pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);…なにかしら、今までと違うわ。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);…ああ、変な感覚だ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);でも、襲ってくるぞ!pc
- }
- &if(解除==1){
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);…またか。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);…なんなのかしら。;おかしな思念を感じるような…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);オレには何も感じないけど…。;とにかく、襲って
- !くる以上は倒して進むしかないだろう。pc
- }
- &if(解除==2){
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);これも結界の一部なのかしら。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);それにしては、カリスは何も感じないと言う。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…。pc
- }
- &if(解除==3){
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);2人とも、余計なことを考えていると、やられる
- !ぜ。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);ああ、わかってる。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);…そうね。ww;とにかく先へ、結界の奥に進めば
- !、謎が解けるかも。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(いったい2人ともこの影に何を感じているんだ
- !…)pc
- }
- &rts
-
- &label 解除完了
- &pcm 3
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);なんだ!?pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);変な振動だった。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);…なぜかしら。ww;とても不吉な予感がするわ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…でも、進むしかない。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);ああ、この奥へ行こう。pc
- 解除=5
- &rts
-
- //━━━━━━━━━━━━━━━━━━━━━━
- //━━━━━━━━━━━━━━━━━━━━━━
- [IV01]//お城見学
- &bgm 22
- &sppsp CHR\IV01.SPP //SPP(人/スプライト)ファイルを設定
- &map MAP\IV01.MAP //マップの設定
- &mapsp MAP\IV01.SP //BGの設定
- &mappal MAP\IV01.PAL //BGパレットの設定
- %partypoint={0,15,2}
- &partyspeed 1
- &partyset 0
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1)={$9 , 0,$20, 8, -1} //カリス
- %mandef(2)={$A , 0,$40, 8, -1} //リアナ
-
-
- &on
-
- &wait 200
- &partymove 2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
- &wait 100
- // 夕陽に照らされ燃え上がる白亜の城、それはリアナの目には今までの人生の中
- // で、最も美しい光景であった。
-
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);サインバラ城…、w白竜城かぁ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);さっきのお爺さんが言ってたねぇ。ww;ほんとキレイ…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);まだ、動き出したばかりだもんな。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);ん、wそうそう!;まだまだこれからよ。pc
- &wait 300
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);さあ、そろそろ今日の宿でも探すか。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);うんっ、w早くフカフカのベッドで眠りたいよ。p;もう、カ
- !リスは客室だったから平気だったろうけど、船員用のベッドむちゃくち
- !ゃ寝心地悪かったんだよ。pc
- &bgm -1
- &contrast 0
- &wait 300
- &goto IV02
-
- //━━━━━━━━━━━━━━━━━━━━━━
- //━━━━━━━━━━━━━━━━━━━━━━
- [IV02]//チンピラ
- &bgm 23
- &sppsp CHR\IV01.SPP
- &map MAP\IV02.MAP //マップの設定
- &mapsp MAP\MATI1.SP //BGの設定
- &mappal MAP\IV02.PAL //BGパレットの設定
- %partypoint={30,14,4}
- &partyset 0
- &partyspeed 1
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(4)={$E , 0,$A0, 2, -1} //チンピラA
- %mandef(5)={$F , 0,$C0, 2, -1} //チンピラB
- %mandef(6)={$B , 0,$E0, 2, -1} //チンピラC
- %mandef(11)={$B, 0,$60, 4, 0} //ダル
- %mandef(12)={$9, 1,$00, 4, 4} //町人
- %mandef(13)={$C, 1,$20, 2, 4} //町人
- %mandef(14)={$D, 1,$40, 6, 3} //町人
- %mandef(15)={$F, 1,$60, 4, 2} //町人
- %mandef(16)={$D, 1,$80, 6, 2} //町人
- %mandef(17)={$E, 1,$A0, 4, 3} //町人
- %mandef(18)={$B, 1,$C0, 8, 3} //町人
- %mandef(19)={$D, 1,$E0, 2, 1} //町人
-
- &on
- &partymove -2,-2,-2,-2,-2,-2,-2,-2,-4,-4,-4,-4,-4,-4,-2
- %mandef(4)={$E , 0,$A1, 2, -1} //チンピラA
- &on
- !o(1)j(2)チンピラj(0);おい見ろよ、カモが歩いてくるぜ。;ガキ2人。pc
- %mandef(5)={$F , 0,$C1, 2, -1} //チンピラB
- %mandef(6)={$B , 0,$E1, 2, -1} //チンピラC
- &on
- !o(1)j(2)チンピラj(0);おっ、なかなかいいじゃん、あいつらひっつかまえて売
- !りゃ、また当分バカ騒ぎできそうだな。pc
- !o(1)j(2)チンピラj(0);もー金がねーんだなー。pc
- !o(1)j(2)チンピラj(0);じゃあ、いっちょやるかっ。pc
- &partyset 1,2
- &on
- &partymove 4,4,4,4,4,4,4,4
- %mandef(8)={$F , 0,$C0, 6, 1} //チンピラB
- %manpoint(8)={15,14}
- %manpoint(5)={100,100}
- &on
- &manmove 8,6,6,6,6,6,6,6
- &pcm 13
- &partyset 0
- %mandef(8)={$F , 0,$C0, 6, 0} //チンピラB
- %manpoint(8)={100,100}
- %mandef(5)={$F , 0,$C2, 2, -1} //チンピラB
- %manpoint(5)={22,14}
- %mandef(1)={$9 , 0,$89, 2, -1} //カリス
- %mandef(2)={$A , 0,$8C, 2, -1} //リアナ
- %manpoint(1)={25,13}
- %manpoint(2)={23,14}
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);きゃっ、何するのっ!pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ぐっ!ww;リアナ!pc
- %mandef(7)={$E , 0,$A0, 6, 0} //チンピラA
- %manpoint(7)={13,12}
- %manpoint(4)={100,100}
- &on
- &manmove 7,6,6,6,6,6
- %mandef(7)={$E , 0,$A0, 6, -1} //チンピラA
- &on
- !o(1)j(2)チンピラj(0);おい、wなにガキが女連れて歩いてやがるんだ。pc
- &manmove 11,-8
- %mandef(11)={$B, 0,$60, 4, -1} //ダル
- &on
- &manmove 15,-8
- %mandef(15)={$F, 1,$60, 4, -1} //町人
- &on
- &manmove 16,-2
- %mandef(16)={$D, 1,$80, 6, -1} //町人
- &on
- &manmove 17,-8
- %mandef(17)={$E, 1,$A0, 4, -1} //町人
- &on
- %mandef(9)={$B , 0,$E0, 6, 0} //チンピラC
- %manpoint(9)={11,14}
- %manpoint(6)={100,100}
- &on
- &manmove 9,6,6,6,6
- %mandef(9)={$B , 0,$E0, 6, -1} //チンピラC
- &on
- !o(1)j(2)チンピラj(0);うらやましーんだなー。pc
- &manmove 14,-6
- %mandef(14)={$D, 1,$40, 6, -1} //町人
- &on
- &manmove 18,-8
- %mandef(18)={$B, 1,$C0, 8, -1} //町人
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);放しなさいよぉっ!pc
- !o(1)j(2)チンピラj(0);大人しくしてろっ!pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);い、痛いっ!pc
- %mandef(1)={$9 , 0,$8A, 2, -1} //カリス
- &on
- %mandef(1)={$9 , 0,$8B, 2, -1} //カリス
- &wait 15
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);リ、リアナっ!pc
- !o(1)j(2)チンピラj(0);坊や、じょーちゃんに痛い思いさせたくなかったら、俺
- !達に黙ってついてきな。pc
- !o(1)j(2)チンピラj(0);ついてくるんだなー。pc
- !o(1)j(2)チンピラj(0);けっ。pc
- &manmove 12,-6
- %mandef(12)={$9, 1,$00, 4, -1} //町人
- &on
- &manmove 13,-2
- %mandef(13)={$C, 1,$20, 2, -1} //町人
- &on
- &manmove 19,-6
- %mandef(19)={$D, 1,$E0, 2, -1} //町人
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);こ、このーっ!ww;ヒールアッパー!pc
- %mandef(2)={$A , 0,$8D, 2, -1} //リアナ
- &on
- %mandef(2)={$A , 0,$8E, 2, -1} //リアナ
- &wait 15
- &on
- &pcm 14
- %mandef(5)={$F , 0,$C3, 2, -1} //チンピラB
- &on
- &manmove 2,6
- !o(1)j(2)チンピラj(0);ふぎゃー!pc
- %mandef(3)={$A , 0,$40, 4, 0} //リアナ
- %manpoint(3)={24,14}
- %manpoint(2)={100,100}
- &on
- &manmove 3,6,6,6,-4
- %mandef(3)={$A , 0,$40, 4, -1} //リアナ
- &on
- %mandef(10)={$9 , 0,$20, 6, 0} //カリス
- %manpoint(10)={25,13}
- %manpoint(1)={100,100}
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);だいじょうぶか。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);どこいっても、こういう悪いやつっているのね。pc
- &manmove 10,-4
- %mandef(10)={$9 , 0,$20, 6, -1} //カリス
- &on
- %mandef(7)={$E , 0,$A0, 6, 0} //チンピラA
- &on
- &manmove 7,6,6,6,6,-2
- !o(1)j(2)チンピラj(0);お、wおい大丈夫か。pc
- &manmove 7,-6
- %mandef(7)={$E , 0,$A0, 6, -1} //チンピラA
- %mandef(9)={$B , 0,$E0, 6, 0} //チンピラC
- &on
- &manmove 9,6,6,6,6
- %mandef(9)={$B , 0,$E0, 6, -1} //チンピラC
- &on
- !o(1)j(2)チンピラj(0);いたそーなんだな。pc
-
- %mandef(8)={$F , 0,$C0, 6, -1} //チンピラB
- %manpoint(8)={22,14}
- %manpoint(5)={100,100}
- &on
- !o(1)j(2)チンピラj(0);…こ、wこのやろー!pc
- !o(1)j(2)チンピラj(0);よしっ、少しお仕置きしてやろうぜ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);ベーだ、wwそれはこっちの台詞!pc
- !o(1)j(2)チンピラj(0);っかー、ぶっ殺してやるっ!pc
- %mandef(11)={$B, 0,$60, 4, 0} //ダル
- &on
- &manmove 11,6,6,6,6,8,8,8,8
- %mandef(11)={$B, 0,$60, 4, -1} //ダル
- &on
- &monsprint 24,32,ダル
- !o(1)j(2)???j(0);おいっ、子供2人相手に3人がかりとは、大の大人が卑怯極
- !まり無い!;助太刀いたそう。pc
- !o(1)j(2)チンピラj(0);バカが、回りのやつらみてぇに黙ってりゃいいものを。p
- !c
-
- &partyset 1,2,3
- &patternpal GR\CG3.PAL //モンスター用パレット
- &bgm 0
- &pcm 9
-
- &battle $1000,14,チンピラ,1,チンピラ+1,1,チンピラ+2,1
- &patternpal GR\CG.PAL //CG用パレット
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &bgm 23
- &partyset 0
-
- &wait 30
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);ファイアー!pc
- %mandef(3)={$A , 0,$40, 4, -1} //リアナ
- %manpoint(3)={100,100}
- %mandef(20)={$A , 0,$8F, 0, -1} //リアナ
- %manpoint(20)={27,14}
- &on
- %mandef(21)={$9 , 0,$04, 4, 0} //火の玉
- %manpoint(21)={26,14}
- &on
- &manmove 21,4,4,4,4
- %manpoint(20)={100,100}
- %manpoint(3)={27,14}
- &on
- &pcm 15
- &freash $8FC0
- &wait 10
- &freash $07C0
- %manpoint(21)={100,100}
- %mandef(7)={$E , 0,$A0, 6, 0} //チンピラA
- %mandef(8)={$F , 0,$C0, 6, 0} //チンピラB
- %mandef(9)={$B , 0,$E0, 6, 0} //チンピラC
- &on
- &manmove 8,-8
- &manmove 7,-8
- &manmove 9,-8
- !o(1)j(2)チンピラj(0);ちっ、ちきしょぉ!pc
- !o(1)j(2)チンピラj(0);い、いたいんだなー!pc
- !o(1)j(2)チンピラj(0);くそっ、ずらかるぞっ!pc
- %mandef(7)={$E , 0,$A0, 2, 1} //チンピラA
- &on
- &manmove 7,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4
- %mandef(7)={$E , 6,$A0, 2, -1} //チンピラA
- %manpoint(7)={100,100}
- %mandef(9)={$B , 0,$E0, 2, 1} //チンピラC
- &on
- &manmove 9,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4
- %mandef(9)={$B , 0,$E0, 2, -1} //チンピラC
- %manpoint(9)={100,100}
- %mandef(8)={$F , 0,$C0, 2, 1} //チンピラB
- &on
- &manmove 8,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4
- %mandef(8)={$F , 0,$C0, 2, -1} //チンピラB
- %manpoint(8)={100,100}
- &on
-
- // チンピラ退却
- %mandef(10)={$9 , 0,$20, 6, 0} //カリス
- &on
- &manmove 10,-2
- %mandef(10)={$9 , 0,$20, 6, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);助太刀、感謝するよ。pc
- %mandef(3)={$A , 0,$40, 4, 0} //リアナ
- &on
- &manmove 3,-2
- %mandef(3)={$A , 0,$40, 4, -1} //リアナ
- %partynamedef(3) = ダル
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);ありがとう、おじさん。pc
- &monsprint 24,32,ダル
- !o(1)j(2)???j(0);いや、君達2人の戦いぶりを見ていたら、私がでしゃばる
- !までもなかったよ。p;私はエイアムのダルだ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);カリスです。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);あたしはリアナ。pc
- !o(1)j(2)民衆j(0);魔法…。ww;魔術師だ…。ww;魔女よ…。pc
- %mandef(12)={$9, 1,$00, 4, 4} //町人
- %mandef(13)={$C, 1,$20, 2, 4} //町人
- %mandef(14)={$D, 1,$40, 6, 3} //町人
- %mandef(15)={$F, 1,$60, 4, 2} //町人
- %mandef(16)={$D, 1,$80, 6, 2} //町人
- %mandef(17)={$E, 1,$A0, 4, 3} //町人
- %mandef(18)={$B, 1,$C0, 8, 3} //町人
- %mandef(19)={$D, 1,$E0, 2, 1} //町人
- &on
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);(…魔法か、これは使えるな)p
- !o(1)j(2)ダルj(0);しかし…、いや…。p;そうだ折角知りあったんだ。;もし良か
- !ったら飯でもご馳走させてくれないか。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);えっ、wほんとおじさん、もちろん行くよ。
- %mandef(3)={$A , 0,$40, 4, 0} //リアナ
- &on
- &manmove 3,-4
- %mandef(3)={$A , 0,$40, 4, -1} //リアナ
- &on
- !;カリス、オッケーよね。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);助けてもらった上にご馳走になったんじゃ。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);いや、これも何かの縁だ。;気にせんでくれ。pc
- %mandef(3)={$A , 0,$40, 4, 0} //リアナ
- &on
- &manmove 3,-2
- %mandef(3)={$A , 0,$40, 4, -1} //リアナ
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);そうそう、ほら行くよ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);wわかった。;じゃあ、ご馳走になるよ。pc
- %mandef(11)={$B, 0,$60, 4, 0} //ダル
- &on
- &manmove 11,8,8,6
- %mandef(11)={$B, 0,$60, 4, -1} //ダル
- &partyset 3,1,2
- %manpoint(3)={100,100}
- %manpoint(10)={100,100}
- %manpoint(11)={100,100}
- &on
- &partymove 4,4,4,4,4
- &contrast 0
- &partymove 4,4,4,4,4,4,4,4
- &goto IV03
-
- //━━━━━━━━━━━━━━━━━━━━━━
- //━━━━━━━━━━━━━━━━━━━━━━
- [IV03]//ダルにご馳走 うみがめ亭
- &sppsp CHR\IV03.SPP
- &bgm 24
- &partyset 0
- &map MAP\IV03.MAP //マップの設定
- &mapsp MAP\IV03.SP //BGの設定
- &mappal MAP\IV03.PAL //BGパレットの設定
- %partypoint={0,0,2}
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1)={$9 , 0,$07, 2, -1} //カリス
- %mandef(2)={$A , 0,$09, 2, -1} //リアナ
- %mandef(3)={$B , 0,$0D, 2, -1} //ダル
- %mandef(4)={$A , 0,$40, 8, 0} //おかみ
- %mandef(5)={$F , 0,$60, 4, 3} //ウェイトレス1
- %mandef(6)={$F , 0,$80, 6, 3} //ウェイトレス2
- %mandef(7)={$3 , 0,$04, 2, -1} //空き皿
- %mandef(8)={$4 , 0,$05, 2, -1} //空き皿、いちごプリン
- %mandef(9)={$E , 0,$A0, 2, 0} //客1
- %mandef(10)={$D, 0,$A4, 2, 0} // 2
- %mandef(11)={$B, 0,$A8, 2, 0} // 3
- %mandef(12)={$A, 0,$AC, 2, 0} // 4
- %mandef(13)={$B, 0,$C0, 2, 0} // 5
- %mandef(14)={$F, 0,$C4, 2, 0} // 6
- %mandef(15)={$B, 0,$C8, 2, 0} // 7
- %mandef(16)={$F, 0,$CC, 2, 0} // 8
- %mandef(17)={$B, 0,$E0, 2, 0} // 9
- %mandef(18)={$C, 0,$E4, 2, 0} // 10
- %mandef(19)={$E, 0,$E8, 2, 0} // 11
- %mandef(20)={$B, 0,$EC, 2, 0} // 12
- %mandef(21)={$F, 1,$00, 2, 0} // 13
- %mandef(22)={$E, 1,$04, 2, 0} // 14
- %mandef(23)={$9, 1,$08, 2, 0} // 15
-
- &on
- %mandef(2)={$A , 0,$0A, 2, -1} //リアナ
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);ふぅ、おいしかったp;
- %mandef(2)={$A , 0,$0B, 2, -1} //リアナ
- &on
- !あっ、すいませーん。;食後のいちごプリンおねがいしまーす。pc
- !o(1)j(2)おかみj(0);あいよー。pc
- &manmove 4,8,-8
- %mandef(2)={$A , 0,$09, 2, -1} //リアナ
- %manpoint(7)={100,100} //空き皿
- %mandef(8)={$4 , 0,$00, 2, -1} //空き皿、いちごプリン
- %mandef(24)={$9, 0,$20, 2, 0} //カリス(待機)
- %mandef(25)={$A, 0,$24, 2, 0} //リアナ(待機)
- %mandef(26)={$B, 0,$28, 2, 0} //ダル(待機)
- %manpoint(24)={18,9}
- %manpoint(25)={18,12}
- %manpoint(26)={12,9}
- %manpoint(1)={100,100}
- %manpoint(2)={100,100}
- %manpoint(3)={100,100}
- &on
- &manmove 4,2,4,4,4,4,4,2,2,2,2,2,2,2,2,2,2,4,4,4,2,2,2,2,2,2,2,2,2
- %manpoint(1)={18,9}
- %manpoint(2)={18,12}
- %manpoint(3)={12,9}
- %manpoint(24)={100,100}
- %manpoint(25)={100,100}
- %manpoint(26)={100,100}
- %mandef(3)={$B , 0,$0E, 2, -1} //ダル
- &on
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);お嬢ちゃん。;満足いったかい。pc
- %mandef(2)={$A , 0,$0A, 2, -1} //リアナ
- %mandef(1)={$9 , 0,$08, 2, -1} //カリス
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);もぅ、あといちごプリンを食べたら大満足よ。ww
- %mandef(2)={$A , 0,$0C, 2, -1} //リアナ
- &on
- !;おじさんいいひとだね。;さっきのヤツラとは大違い。pc
- %mandef(3)={$B , 0,$0F, 2, -1} //ダル
- &on
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);はは、そりゃ良かったpc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);でも、女のカンとしては、何か裏がありそう。pc
- %mandef(3)={$B , 0,$0E, 2, -1} //ダル
- %mandef(1)={$9 , 0,$07, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);さっき通りで何か言いかけてたけど。pc
- %mandef(3)={$B , 0,$0D, 2, -1} //ダル
- &on
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);ああ、ほんとカンがいいなぁ。ww
- %mandef(3)={$B , 0,$0E, 2, -1} //ダル
- &on
- !;実はお嬢ちゃんにたのみがあるんだ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);あたしに?pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);さっきのあんたの力、あれは魔法だよな。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);え、wええ…。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);魔法国アバインじゃ魔法の習得には、普通10年から20年
- !掛かるものと聞いたことがある。p;なぜ、お嬢ちゃんがそうたやすく魔
- !法を使えているのかについては、深く聞くつもりはないんだが。p;率直
- !な話、あんたのその力を借りたいんだ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);どういう…?。pc
- %mandef(3)={$B , 0,$0D, 2, -1} //ダル
- &on
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);まあ、聞いてくれ。p;私はここから北にあるエイアムに住ん
- !でいて、ここに所用があって来たんだ。p;だが、帰りの道が崖崩れで塞
- !がれて足止めされてしまったんだ。p;軍には報告してあるんだが、なか
- !なか時間がかりそうでな。p;
- %mandef(3)={$B , 0,$0E, 2, -1} //ダル
- &on
- !そこで魔法でどうにかして欲しいんだが。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);そういうことかぁ、岩を壊すのね。;別に構わないよ。p;人
- !を傷つけるよりそういうことに役立つ方がうれしいもん。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);まあ、リアナがそういうならオレも構わない。;どうせ、ま
- !だ宛の無い旅だし。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);そうか、ありがとう。;今はあまり持ち合わせがないんだが、
- !町に戻ったら礼金を出すよ。pc
- %mandef(2)={$A , 0,$0A, 2, -1} //リアナ
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);こんだけご馳走してもらえれば満足だよ。pc
- %mandef(2)={$A , 0,$0C, 2, -1} //リアナ
- %mandef(3)={$B , 0,$0D, 2, -1} //ダル
- &on
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);それじゃあ、明日の昼に出発ということで頼むよ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);わかった。pc
- %mandef(3)={$B , 0,$0E, 2, -1} //ダル
- %mandef(24)={$9, 0,$20, 2, 0} //カリス(待機)
- %mandef(25)={$A, 0,$24, 2, 0} //リアナ(待機)
- %mandef(26)={$B, 0,$28, 2, 0} //ダル(待機)
- %manpoint(24)={18,9}
- %manpoint(25)={18,12}
- %manpoint(26)={12,9}
- %manpoint(1)={100,100}
- %manpoint(2)={100,100}
- %manpoint(3)={100,100}
- &on
- &manmove 4,8,8,8,8,8,8,8,8,8,6,6,6,8,8,8,8,8,8,8,8,8,8,6,6,6,6,6
- %manpoint(1)={18,9}
- %manpoint(2)={18,12}
- %manpoint(3)={12,9}
- %manpoint(24)={100,100}
- %manpoint(25)={100,100}
- %manpoint(26)={100,100}
- &on
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);おっと、お嬢ちゃんお待ちかねのデザートが来たぞ。pc
- &manmove 4,6,8,-8
- %mandef(8)={$4 , 0,$06, 2, -1} //空き皿、いちごプリン
- &on
- %mandef(1)={$9 , 0,$08, 2, -1} //カリス
- %mandef(2)={$A , 0,$0A, 2, -1} //リアナ
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);うわーっ、w美味しそうpc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(ほんとうまそうだな…)pc
-
- &partyset 1,2
- &goto MATI1
-
- //━━━━━━━━━━━━━━━━━━━━━━
- //━━━━━━━━━━━━━━━━━━━━━━
- [IV04]//街道の大岩
- &bgm 25
- &sppsp CHR\IV04.SPP //SPP(人/スプライト)ファイルを設定
- &map MAP\IV04.MAP //マップの設定
- &mapsp MAP\IV04.SP //BGの設定
- &mappal MAP\IV04.PAL //BGパレットの設定
- &partyspeed 1
- %partypoint={0,32,8}
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1) ={$9 , 0,$2C, 0, -1} //カリス
- %mandef(2) ={$A , 0,$4C, 0, -1} //リアナ
- %mandef(3) ={$B , 0,$6C, 0, -1} //ダル
- %mandef(4) ={$7 , 0,$C0, 2, 0} //盗賊
- %mandef(5) ={$F , 0,$E0, 4, 0} //旅人
- %mandef(6) ={$7 , 1,$00, 4, 0} //旅人
- %mandef(7) ={$8 , 1,$20, 4, 0} //旅人
- %mandef(8) ={$D , 1,$40, 4, 0} //旅人
- %mandef(9) ={$B , 1,$60, 4, 0} //旅人
- %mandef(11)={$3 , 0,$80, 0, -1} //落石
- %mandef(12)={$3 , 0,$81, 0, -1} //落石
- %mandef(13)={$3 , 0,$82, 0, -1} //落石
- %mandef(14)={$3 , 0,$83, 0, -1} //落石
- %mandef(15)={$3 , 0,$84, 0, -1} //落石
- %mandef(16)={$3 , 0,$85, 0, -1} //落石
- %mandef(17)={$3 , 0,$86, 0, -1} //落石
- %mandef(18)={$3 , 0,$87, 0, -1} //落石
- %mandef(19)={$3 , 0,$88, 0, -1} //落石
- %mandef(20)={$3 , 0,$89, 0, -1} //落石
- %mandef(21)={$3 , 0,$8A, 0, -1} //落石
- %mandef(22)={$3 , 0,$8B, 0, -1} //落石
- %mandef(23)={$3 , 0,$8C, 0, -1} //落石
- %mandef(24)={$3 , 0,$8D, 0, -1} //落石
- %mandef(25)={$3 , 0,$8E, 0, -1} //落石
- %mandef(26)={$3 , 0,$00, 0, -1} //落石
- %mandef(27)={$3 , 0,$00, 0, -1} //落石
- &on
-
- &partymove 8,8,8,8,8,8,8,8,-8
-
- &wait 50
-
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);見てのとおりだ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);スゴイな。pc
- %mandef(3) ={$B , 0,$64, 0, -1} //ダル
- &on
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);お嬢ちゃん、いけそうか。pc
- %mandef(2) ={$A , 0,$42, 0, -1} //リアナ
- &on
- &wait 20
- %mandef(2) ={$A , 0,$40, 0, -1} //リアナ
- &on
- &wait 10
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);わかんない。;でも、wとにかくやってみる。pc
- %mandef(1) ={$9 , 0,$24, 0, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);大丈夫か。pc
- %mandef(2) ={$A , 0,$41, 0, -1} //リアナ
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);やるっきゃないでしょ。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);頼んだぞ。pc
- %mandef(2) ={$A , 0,$40, 0, -1} //リアナ
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);じゃあ、はじめるから、みんな下がって。pc
- %mandef(3) ={$B , 0,$60, 0, -1} //ダル
- &on
- &wait 20
- %mandef(1) ={$9 , 0,$20, 0, -1} //カリス
- &on
- &wait 40
- %mandef(3) ={$B , 0,$65, 0, -1} //ダル
- &on
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);これから、魔法で岩を砕く。;みんな下がってくれー!pc
- %mandef(3) ={$B , 0,$60, 0, -1} //ダル
- &on
- &wait 50
- &manmove 5,-6,2,2,2,2,2,2,-6
- &manmove 6,-6,2,2,2,2,2,-6
- &manmove 7,-6,2,2,2,2,2,2,2,-6
- &manmove 8,-6,2,2,-6
- &manmove 9,-6,-6
- &wait 20
- %mandef(30) ={$B , 0,$60, 0, 0} //ダル
- %manpoint(3)={100,100}
- %manpoint(30)={13,27}
- &on
- &manmove 30,2,2,2,2
- %mandef(3) ={$B , 0,$6C, 0, -1} //ダル
- %manpoint(3)={13,31}
- %manpoint(30)={100,100}
- &on
- %mandef(28) ={$9 , 0,$20, 0, 0} //カリス
- %manpoint(1)={100,100}
- %manpoint(28)={17,26}
- &on
- &manmove 28,2,2,2
- %mandef(1) ={$9 , 0,$2C, 0, -1} //カリス
- %manpoint(1)={17,29}
- %manpoint(28)={100,100}
- &on
-
- %mandef(29) ={$A , 0,$40, 0, 0} //リアナ
- %manpoint(29)={15,25}
- %manpoint(2)={100,100}
- &on
- &manmove 29,8,8,8,8
- %mandef(2) ={$A , 0,$4C, 0, -1} //リアナ
- %manpoint(2)={15,21}
- %manpoint(29)={100,100}
- &on
- &partymove 8,8,8,8,-8
- &wait 150
- %mandef(2) ={$A , 0,$43, 0, -1} //リアナ
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);ふぅーっ!pc
- &jsr 魔法1
- &wait 200
-
- &jsr 魔法1
- &wait 10
- &jsr 魔法1
- &wait 100
-
- &jsr 魔法1
- &jsr 魔法1
- &jsr 魔法1
- &jsr 魔法1
- &jsr 魔法1
- &wait 10
- %mandef(11)={$3 , 0,$A0, 0, -1} //落石
- %mandef(12)={$3 , 0,$A1, 0, -1} //落石
- %mandef(13)={$3 , 0,$A2, 0, -1} //落石
- %mandef(14)={$3 , 0,$A3, 0, -1} //落石
- %mandef(15)={$3 , 0,$A4, 0, -1} //落石
- %mandef(16)={$3 , 0,$A5, 0, -1} //落石
- %mandef(17)={$3 , 0,$A6, 0, -1} //落石
- %mandef(18)={$3 , 0,$A7, 0, -1} //落石
- %mandef(19)={$3 , 0,$A8, 0, -1} //落石
- %mandef(20)={$3 , 0,$A9, 0, -1} //落石
- %mandef(21)={$3 , 0,$AA, 0, -1} //落石
- %mandef(22)={$3 , 0,$AB, 0, -1} //落石
- %mandef(23)={$3 , 0,$AC, 0, -1} //落石
- %mandef(24)={$3 , 0,$AD, 0, -1} //落石
- %mandef(25)={$3 , 0,$AE, 0, -1} //落石
- %mandef(26)={$3 , 0,$8F, 0, -1} //落石
- %mandef(27)={$3 , 0,$AF, 0, -1} //落石
- &pcm 17
- &freash $ffff
- &freash $ffff
- &freash $87C0
- &freash $87C0
- &freash $87C0
- &freash $87C0
- &freash $3A4A
- &freash $3A4A
- &freash $7410
- &freash $7410
- &freash $3A4A
- &freash $3A4A
- &on
- &freash $7410
- &freash $7410
- &freash $3A4A
- &freash $3A4A
- &freash $7410
- &freash $7410
- &freash $3A4A
- &freash $3A4A
- &freash $7410
- &freash $7410
-
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);やった!pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);よしっ!pc
- %mandef(2) ={$A , 0,$4C, 0, -1} //リアナ
- &on
- &wait 50
- %mandef(2) ={$A , 0,$46, 0, -1} //リアナ
- &on
- &wait 15
- %mandef(2) ={$A , 0,$47, 0, -1} //リアナ
- &on
- &wait 15
- %mandef(2) ={$A , 0,$48, 0, -1} //リアナ
- &on
- &wait 20
- %mandef(2) ={$A , 0,$49, 0, -1} //リアナ
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);リアナっ!
- %mandef(28) ={$9 , 0,$20, 8, 1} //カリス
- %manpoint(28)={17,29}
- %manpoint(1)={100,100}
- &on
- &manmove 28,8,8,8,8,8,8,8,8
- %mandef(28) ={$9 , 0,$20, 2, 0} //カリス
- %mandef(1) ={$9 , 0,$25, 2, -1} //カリス
- %manpoint(1)={17,21}
- %manpoint(28)={100,100}
- &on
- !;大丈夫かっ!pc
-
- %mandef(30) ={$B , 0,$60, 8, 1} //ダル
- %manpoint(30)={13,31}
- %manpoint(3)={100,100}
- &on
- &manmove 30,8,8,8,8,8,8,8,8,8
- %mandef(30) ={$B , 0,$60, 0, 0} //ダル
- %mandef(3) ={$B , 0,$66, 0, -1} //ダル
- %manpoint(3)={13,22}
- %manpoint(30)={100,100}
- &on
-
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);お嬢ちゃん!pc
- &wait 50
- %mandef(2) ={$A , 0,$4A, 0, -1} //リアナ
- &on
- &wait 20
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);へへへ…、wうまくいったみたいね。ww;…ちょっと力を使いすぎ
- !ちゃった。p;すこし、眠らwせwて…。pc
- %mandef(2) ={$A , 0,$4B, 0, -1} //リアナ
- &on
- &contrast 0
- &wait 400
- %mandef(1) ={$9 , 0,$26, 2, -1} //カリス
- %mandef(31) ={$A , 0,$00, 2, -1} //リアナ
- %mandef(32) ={$A , 0,$01, 2, -1} //リアナ
- %mandef(3) ={$B , 0,$67, 0, -1} //ダル
- %manpoint(1)={20,25}
- %manpoint(3)={15,24}
- %manpoint(31)={16,24}
- %manpoint(32)={18,24}
- %manpoint(2)={100,100}
- %manpoint(5)={100,100}
- %manpoint(6)={100,100}
- %manpoint(7)={100,100}
- %manpoint(8)={100,100}
- %manpoint(9)={100,100}
- &on
- &partymove 2,2,2,2,2,2,2,-2
- &contrast 15
-
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);ふあぁーぁ…。
- %mandef(31) ={$A , 0,$02, 2, -1} //リアナ
- %mandef(32) ={$A , 0,$03, 2, -1} //リアナ
- &on
- &wait 20
- %mandef(31) ={$A , 0,$00, 2, -1} //リアナ
- %mandef(32) ={$A , 0,$01, 2, -1} //リアナ
- &on
- &wait 20
- %mandef(31) ={$A , 0,$02, 2, -1} //リアナ
- %mandef(32) ={$A , 0,$03, 2, -1} //リアナ
- &on
- &wait 20
- %mandef(31) ={$A , 0,$00, 2, -1} //リアナ
- %mandef(32) ={$A , 0,$01, 2, -1} //リアナ
- &on
- &wait 30
- %mandef(31) ={$A , 0,$04, 2, -1} //リアナ
- %mandef(32) ={$A , 0,$05, 2, -1} //リアナ
- &on
- &wait 20
- !;ふぅー、だいぶ楽になった。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);無理させて済まなかったな。pc
- %mandef(31) ={$A , 0,$0A, 2, -1} //リアナ
- %mandef(32) ={$A , 0,$0B, 2, -1} //リアナ
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);ほんとだよ。;おじさんの町に着いたら、また沢山ご馳走し
- !てもらうからね。pc
- %mandef(1) ={$9 , 0,$28, 2, -1} //カリス
- %mandef(3) ={$B , 0,$69, 0, -1} //ダル
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ハハハ。;w元気だな。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);ガハハハ。;wお嬢ちゃんには負けるよ。;それじゃ、そろそろ
- !行こうか。pc
- %mandef(1) ={$9 , 0,$26, 2, -1} //カリス
- %mandef(3) ={$B , 0,$67, 0, -1} //ダル
- %mandef(31) ={$A , 0,$06, 2, -1} //リアナ
- %mandef(32) ={$A , 0,$07, 2, -1} //リアナ
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);うん、そうしよ。pc
- &partyspeed 2
- &monsprint 24,32,ダル,0
- &monsprint 104,32,カリス1,1
- %mandef(1) ={$9 , 0,$27, 2, -1} //カリス
- %mandef(3) ={$B , 0,$68, 0, -1} //ダル
- &on
- !o(1)j(2)ダル・カリスj(0);?!pc
- &partymove 8,8,8,8,8,8,8,8,8,8,8,8,8,8,-8,-8,-8,-8
- &manmove 4,-4,8,8,8,8,8,8
- &wait 50
- &partymove 2,2,2,2,2,2,2,2,2,2,2,2,2,2,-2,-2,-2,-2
- %mandef(1) ={$9 , 0,$26, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);今のは?pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);やはり、自然災害ってわけじゃないみたいだな。pc
- %mandef(3) ={$B , 0,$67, 0, -1} //ダル
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);どういう…。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);(嫌な予感がする)p
- !o(1)j(2)ダルj(0);お嬢ちゃんには悪いが急ごう。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);えっ?
- %mandef(31) ={$A , 0,$08, 2, -1} //リアナ
- %mandef(32) ={$A , 0,$09, 2, -1} //リアナ
- &on
- &wait 20
- %mandef(31) ={$A , 0,$06, 2, -1} //リアナ
- %mandef(32) ={$A , 0,$07, 2, -1} //リアナ
- &on
- &wait 20
- %mandef(31) ={$A , 0,$08, 2, -1} //リアナ
- %mandef(32) ={$A , 0,$09, 2, -1} //リアナ
- &on
- &wait 20
- %mandef(31) ={$A , 0,$06, 2, -1} //リアナ
- %mandef(32) ={$A , 0,$07, 2, -1} //リアナ
- &on
- &wait 20
- !;うん。pc
- 進行=7
- &goto2 FIELD,186,104,8
-
- &label 魔法1
- %mandef(2) ={$A , 0,$44, 0, -1} //リアナ
- &on
- &monsprint 96,32,魔法_01
- &wait 5
- &monsprint 96,32,魔法_02
- &wait 5
- &monsprint 96,32,魔法_03
- &wait 5
- &monsprint 96,32,魔法_02
- &wait 5
- &monsprint 96,32,魔法_03
- &wait 5
- %mandef(2) ={$A , 0,$45, 0, -1} //リアナ
- &on
- &monsprint 96,32,魔法_04
- &wait 5
- &monsprint 96,32,魔法_05
- &pcm 16
- &monsprint 96,32,魔法_06
- &freash $87C0
- &monsprint 96,32,魔法_07
- %mandef(2) ={$A , 0,$44, 0, -1} //リアナ
- &on
- &wait 5
- &monsprint 96,32,消し
- &rts
-
- //━━━━━━━━━━━━━━━━━━━━━━
- //━━━━━━━━━━━━━━━━━━━━━━
- [IV05]//盗賊襲撃の跡
- &bgm 23
- &sppsp CHR\IV05.SPP //SPP(人/スプライト)ファイルを設定
- &map MAP\IV05.MAP //マップの設定
- &mapsp MAP\IV05.SP //BGの設定
- &mappal MAP\IV05.PAL //BGパレットの設定
- %partypoint={15,27,-8}
- &partyspeed 1
- &partyset 1,2
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(3) ={$B , 0,$60, 8, -1} //ダル
- %mandef(6) ={$5 , 0,$E0, 2, -1} //樽
- %mandef(7) ={$5 , 0,$E1, 2, -1} //樽
- %mandef(8) ={$5 , 0,$E2, 2, -1} //樽
- %mandef(9) ={$5 , 0,$E3, 2, -1} //箱
- %mandef(10)={$5 , 0,$E3, 2, -1} //箱
- %mandef(11)={$4 , 0,$E8, 2, -1} //壷
- %mandef(12)={$4 , 0,$E4, 2, -1} //壷
- %mandef(13)={$5 , 0,$E5, 2, -1} //人形
- %mandef(14)={$6 , 0,$E6, 2, -1} //宝箱
- %mandef(15)={$6 , 0,$E7, 2, -1} //宝箱
- %mandef(16)={$5 , 0,$E6, 2, -1} //宝箱
- %mandef(17)={$5 , 0,$E7, 2, -1} //宝箱
- %mandef(18)={$B , 0,$E9, 2, -1} //町の人
- %mandef(19)={$F , 0,$EA, 2, -1} //町の人
- %mandef(20)={$E , 0,$EB, 2, -1} //町の人
- %mandef(21)={$A , 0,$EC, 2, -1} //町の人
-
- &on
- &wait 50
- %mandef(3) ={$B , 0,$60, 8, 0} //ダル
- &on
- &manmove 3,-4,-6,8,8,8,8,-4,-6,8
- %mandef(3) ={$B , 0,$60, 8, -1} //ダル
- &on
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);こ、これは一体っ!pc
- &partymove 8,8,8,8
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);…ひどいっ!pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(戦?;いや、さっきの人影…!)pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);ちきしょーっ!pc
- %mandef(3) ={$B , 0,$60, 8, 1} //ダル
- &on
- &manmove 3,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8
- %mandef(3) ={$B , 0,$60, 8, -1} //ダル
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);ちょ、wちょっと、おじさん!pc
- &partymove -2
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);追いかけよう。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);う、うん。pc
- &partyspeed 2
- &partymove 8,8,8,8,8,8,8,8,8,8,8
- &contrast 0
- &wait 200
- &goto IV06
-
- //━━━━━━━━━━━━━━━━━━━━━━
- //━━━━━━━━━━━━━━━━━━━━━━
- [IV06]//エイアムの酒場
- &sppsp CHR\IV05.SPP
- &map MAP\IV06.MAP //マップの設定
- &mapsp MAP\IV06.SP //BGの設定
- &mappal MAP\IV06.PAL //BGパレットの設定
- %partypoint={18,31,-8}
- &partyspeed 1
- &partyset 0
-
- &if(進行<8){
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(3) ={$B , 0,$60, 8, 1} //ダル
- %manpoint(3)={18,30}
- %mandef(6) ={$B , 0,$83, 2, -1} //町人
- %mandef(7) ={$F , 0,$85, 2, -1} //町人
- %mandef(8) ={$C , 0,$87, 2, -1} //町人
- %mandef(9) ={$B , 0,$8A, 2, -1} //町人
- %mandef(10)={$9 , 0,$8C, 2, -1} //町人
- %mandef(13)={$B , 0,$89, 2, -1} //町人
-
- &on
-
- &manmove 3,8,8,8,8,8,8,8,8,8,8,8,8
- %mandef(3) ={$B , 0,$60, 8, -1} //ダル
- %manpoint(3)={100,100}
- %mandef(14)={$B , 0,$6C, 2, -1} //ダル
- %manpoint(14)={18,18}
- %mandef(6) ={$B , 0,$84, 2, -1} //町人
- &on
- !o(1)j(2)町人j(0);ダル!pc
- %mandef(7) ={$F , 0,$86, 2, -1} //町人
- %mandef(8) ={$C , 0,$88, 2, -1} //町人
- %mandef(9) ={$B , 0,$8B, 2, -1} //町人
- %mandef(10)={$9 , 0,$8D, 2, -1} //町人
- &on
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);また、やつらかっ!pc
- !o(1)j(2)町人j(0);ああ…、w夜明けごろ襲撃してきた。pc
- !o(1)j(2)町人j(0);よりによって、ダルが盗賊の討伐隊の派遣を申し立てに行
- !っている時に…。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);(やはり、あの落石もヤツラの仕業か)pc
- &partyset 1,2
- &on
- &partymove 8,8,8,8,8,8,8,8
- !o(1)j(2)町人j(0);ちきしょー、なんてタイミングが悪いんだ。pc
- !o(1)j(2)町人j(0);家は焼かれちまうし、女子供はさらわれちまった。pc
- !o(1)j(2)町人j(0);やつらのアジトは判かってるっていうのに、こんな状態じ
- !ゃ…。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);なんてことだ…。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);でも、早く助けに行かないと!pc
- !o(1)j(2)町人j(0);ん?w;この子たちは?pc
- %mandef(14)={$B , 0,$80, 2, -1} //ダル
- &on
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);ああ、道中世話になってな。;カリスとリアナだ。pc
- %mandef(14)={$B , 0,$6C, 2, -1} //ダル
- &on
- !o(1)j(2)町人j(0);そうか、ダルが世話になったってのに、この有様でなんのも
- !てなしも出来ず、すまないな。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);そんなことより、早く捕まってる人たちを助けなくちゃ。p
- !c
- !o(1)j(2)町人j(0);そうしたいのは山々なんだが、生き残った男たちもほとん
- !どが怪我人だ。;助け出したくても…。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);ダリムラクスから直に兵が着くはずだ。;そうすれば…。wwp
- !o(1)j(2)ダルj(0);(いや、間に合うのか。;少数でも兵を率い、救出に行くべき
- !かも。p;こうしている間にも、女子供たちが辛い思いをしているはずだ)pc
- !o(1)j(2)町人j(0);ダル?pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);…やはり、救出に行こう。;今なら盗賊どもも勝利に油断して
- !いるだろう。p;下手に時間が経つと捕らわれた者たちに危害が及ぶ可能
- !性がある。pc
- &wait 50
- !o(1)j(2)町人j(0);…わかった、救出隊をつくろう。;軽傷の者も入れれば20
- !人ぐらいは集まるだろう。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);いや、少数で行こう。p;とにかく迅速な救出だけを目的にする。
- !p;残った者は怪我人の手当と復旧作業を、それと、盗賊討伐隊が来たら、
- !盗賊のアジトに案内してくれ。pc
- !o(1)j(2)町人j(0);わかった。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ダル、オレも手を貸す。pc
- %mandef(14)={$B , 0,$80, 2, -1} //ダル
- &on
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);ありがたいが、君等は部外者だ。;巻き込むわけにはいかない。
- !pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);気にしないでくれ。;それにあなたとはもう知り合いだ、部
- !外者じゃないぜ。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);…ありがとう。ww;正直、君の剣の腕があると、心強い。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);…。pc
- &partymove -2
- &wait 20
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);リアナはここに残ってな。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);えっ…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);さっきので、かなり疲れてるだろう。;休んでな。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);でも…。p
- !o(1)j(2)リアナj(0);(町の人を助けたい、でも、たたかうのは嫌…)pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);それで、少し落ち着いたら、怪我人の治療をしてやればい
- !い。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);カリス…、wうんっ!pc
- %mandef(14)={$B , 0,$6C, 2, -1} //ダル
- &on
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);30分で準備を整えて出発するぞ。pc
- &if(%rasthaveitem>0){
- &partyitemin ユハイポーション
- }
- &if(%rasthaveitem>0){
- &partyitemin ユハイポーション
- }
- &if(%rasthaveitem>0){
- &partyitemin ユハイポーション
- }
- &if(%rasthaveitem>0){
- &partyitemin ユハイポーション
- }
- &contrast 0
- &wait 300
- &partymove -8
- &partyset 0
-
- %mandef(1) ={$9 , 0,$20, 8, -1} //カリス
- %mandef(2) ={$A , 0,$40, 2, -1} //リアナ
- %mandef(4) ={$B , 0,$81, 2, -1} //マクス
- %mandef(5) ={$F , 0,$82, 2, -1} //ジョン
- %manpoint(1)={17,20}
- %manpoint(2)={17,18}
- %manpoint(14)={19,20}
- %manpoint(4)={16,23}
- %manpoint(5)={18,25}
- &on
- &contrast 15
-
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);じゃあ、行ってくる。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);気を付けてね…。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);お嬢ちゃん、そう心配するな。;w無事戻ってくるよ。pc
-
-
- 進行=8
- &partyset 3,1,7,8
- &goto2 FIELD,@2,2
- }
-
- &bgm 13
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(15)={$9, 0,$04, 2, -1} //カリス
- %manpoint(15)={15,15}
- %mandef(16)={$A, 0,$A4, 2, -1} //リアナ
- %manpoint(16)={17,15}
- %mandef(17)={$B, 0,$08, 2, -1} //ダル
- %manpoint(17)={13,15}
- %mandef(6) ={$B , 0,$84, 2, -1} //町人
- %mandef(10)={$9 , 0,$8D, 2, -1} //町人
-
- &on
-
- %mandef(16)={$A, 0,$A5, 2, -1} //リアナ
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);ほんと、みんな無事で良かった。pc
- %mandef(17)={$B, 0,$09, 2, -1} //ダル
- &on
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);ああ、これも2人がいたおかげだよ。pc
- %mandef(16)={$A, 0,$A6, 2, -1} //リアナ
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);えっ、あたし何もしてないよ。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);いや、wお嬢ちゃんが街道の大岩を砕いてくれたおかげで、討
- !伐隊の到着が早かった。p;もし、援軍が来なかったら私もカリスも危な
- !いところだったんだ。pc
- %mandef(15)={$9, 0,$05, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、ほんとそうだよ。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);それに、負傷者の傷の手当や残っていた子供たちの世話まで
- !してもらい、町の者はみんな感謝している。pc
- %mandef(16)={$A, 0,$A7, 2, -1} //リアナ
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);へへえ、w…あたしって凄いねぇ。pc
- %mandef(11)={$A, 0,$A0, 8, 0} //子供
- %manpoint(11)={18,30}
- &on
- &manmove 11,8,8,8,8,8,8,8,8
- %mandef(11)={$A, 0,$A0, 8, -1} //子供
- &on
- !o(1)j(2)子供j(0);おねーちゃん、あそぼ。pc
- %mandef(16)={$A, 0,$A8, 2, -1} //リアナ
- %mandef(12)={$F, 0,$C0, 8, 0} //子供
- %manpoint(12)={18,30}
- &on
- &manmove 12,8,8
- %mandef(12)={$F, 0,$C0, 8, -1} //子供
- &on
- !o(1)j(2)子供j(0);リアナおねーちゃん、お話してよぉ。pc
- %mandef(15)={$9, 0,$06, 2, -1} //カリス
- %mandef(17)={$B, 0,$0A, 2, -1} //ダル
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);あ、はいはい。;ちょっと待ってねぇ。pc
- %mandef(16)={$A, 0,$C4, 2, -1} //リアナ
- &on
- &wait 10
- %mandef(16)={$A, 0,$C5, 2, -1} //リアナ
- &on
- &wait 10
- %mandef(16)={$A, 0,$C6, 2, -1} //リアナ
- &on
- &wait 10
- %mandef(16)={$A, 0,$C7, 2, -1} //リアナ
- &on
- &wait 10
- &manmove 16,2,6
- %mandef(16)={$A, 0,$C8, 2, -1} //リアナ
- &on
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);ほら、すっかり人気者だな。pc
- %mandef(11)={$A, 0,$A0, 8, 0} //子供
- &on
- &manmove 11,2,2,2,2
- %mandef(12)={$F, 0,$C0, 8, 0} //子供
- &on
- &manmove 12,2,2
- %manpoint(12)={100,100}
- &on
- &manmove 11,2,2,2,2
- %manpoint(11)={100,100}
- %mandef(16)={$A, 0,$C9, 2, -1} //リアナ
- &on
- &wait 10
- %mandef(16)={$A, 0,$CA, 2, -1} //リアナ
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);じゃあ、ちょっと行ってくるね。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ん、ああ。pc
- %mandef(18)={$A, 0,$00, 2, 0} //リアナ
- %manpoint(16)={100,100}
- %manpoint(18)={18,16}
- &on
- &manmove 18,2,2,2,2,2,2,2,2,2,2,2,2,2,2
- %manpoint(18)={100,100}
- &on
-
- %mandef(17)={$B, 0,$08, 2, -1} //ダル
- &on
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);はは、いい娘だな。www;カリス、それでこれからどうするんだ。
- !pc
- %mandef(15)={$9, 0,$04, 2, -1} //カリス
- &on
- &wait 30
- %mandef(15)={$9, 0,$07, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…そうだ。;ダルに聞きたいことがあったんだ。pc
- %mandef(17)={$B, 0,$09, 2, -1} //ダル
- &on
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);ん、なんだ?pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);リザレア。w;たぶん国の名前だと思うんだが、聞き覚えは
- !ないかい。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);リザレア?ww;聞いたこと無いな。;それが目的地なのか?pc
- %mandef(15)={$9, 0,$04, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);実は…。pc
-
- &contrast 0
- &wait 300
- &contrast 15
-
- %mandef(17)={$B, 0,$08, 2, -1} //ダル
- &on
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);なるほど、そういうことか。p
- !o(1)j(2)ダルj(0);(訳有りだとは思っていたが、こんな少年が…w不敏
- !なことだ)p
- !o(1)j(2)ダルj(0);…リザレアか、wもしかしたら歴史上の国なのかもしれないな
- !。p;この世界が今のように落ち着く以前は、多くの国が生まれては消え
- !ていってるからな。pc
- %mandef(15)={$9, 0,$07, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);歴史上の国…。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);そうだな。;そういう歴史に関する資料となったら聖都市アル
- !テガか学問の都リーナスの図書館にあるはずだ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);アルテガ、リーナス…。pc
- %mandef(17)={$B, 0,$09, 2, -1} //ダル
- &on
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);アルテガは燐国オルテニスの首都だ。;川を渡り街道沿いに進
- !めば行ける。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ありがとう、ダル。;アルテガに向かうよ。pc
- &complete
-
- &goto IV07
-
- //━━━━━━━━━━━━━━━━━━━━━━
- //━━━━━━━━━━━━━━━━━━━━━━
- [IV07]//エイアムの復旧作業
- &sppsp CHR\IV07.SPP
- &map MAP\IV07.MAP //マップの設定
- &mapsp MAP\IV07.SP //BGの設定
- &mappal MAP\IV07.PAL //BGパレットの設定
- %partypoint={0,0,2}
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1)={$B , 0,$28, 2, -1} //ダル
- %mandef(4)={$9 , 1,$40, 2, -1} //カリス
- %manpoint(1)={16,15}
- %manpoint(4)={20,6}
- %mandef(5)={$A , 1,$60, 2, -1} //リアナ
- %mandef(6)={$F , 1,$24, 2, -1} //子供
- %mandef(7)={$A , 0,$C0, 8, 2} //子供
- %mandef(8)={$B , 0,$E0, 4, 3} //おばさん
- %mandef(9)={$F , 1,$00, 2, 0} //壁を塗ってる人
- %mandef(10)={$B, 1,$04, 2, 0} //壁を塗ってる人
- %mandef(13)={$E, 1,$08, 2, 0} //材木切ってる人
- %mandef(14)={$A, 1,$0C, 2, 0} //材木切ってる人
- %mandef(15)={$B, 1,$20, 2, 0} //休んでる人
- %mandef(16)={$F, 1,$2C, 2, 0} //道直してる人
- %mandef(17)={$C, 1,$28, 2, 0} //扉作ってる人
- %mandef(18)={$4, 0,$06, 2, -1} //おけ
- %mandef(19)={$4, 0,$06, 2, -1} //おけ
- %mandef(20)={$6, 0,$01, 2, -1} //レンガ
- %mandef(21)={$6, 0,$02, 2, -1} //レンガ
- %mandef(22)={$6, 0,$05, 2, -1} //板
- %mandef(23)={$6, 0,$05, 2, -1} //板
- %mandef(24)={$6, 0,$03, 2, -1} //梯子
- %mandef(25)={$6, 0,$03, 2, -1} //梯子
- %mandef(33)={$2, 0,$0C, 2, -1} //瓦
- %manpoint(33)={22,14}
-
-
- &on
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);2人ともすまないな。pc
- %mandef(5)={$A , 1,$61, 2, -1} //リアナ
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);もう何度目?pc
- %mandef(4)={$9 , 1,$41, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);オレたちの意志で手伝っているんだから、気にしないでく
- !れ。pc
- %mandef(1)={$B , 0,$0E, 2, -1} //ダル
- &on
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);ああ、本当に助かる。pc
-
- %mandef(3)={$C , 0,$60, 6, 0} //町人
- %manpoint(3)={0,22}
- &on
- &manmove 3,6,6,6,6
- !o(1)j(2)町人j(0);ダル、あんたに客だぜ。pc
- &manmove 3,-2
- %mandef(1)={$B , 0,$0F, 2, -1} //ダル
- %mandef(3)={$C , 0,$60, 6, -1} //町人
- &on
- %mandef(2)={$F , 0,$40, 6, 0} //エスキオ
- %manpoint(2)={0,23}
- &on
- &manmove 2,6,6,6,6,6,6
- %mandef(2)={$F , 0,$40, 6, -1} //エスキオ
- &on
- !o(1)j(2)???j(0);ダル様!pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);エスキオか!pc
- &monsprint 24,32,カリス1,0
- &monsprint 104,32,リアナ1,1
- !o(1)j(2)カリス・リアナj(0);?pc
- %mandef(3)={$C , 0,$60, 6, 0} //町人
- &on
- &manmove 3,4,4,4,4,4
- %manpoint(3)={100,100}
- %mandef(2)={$F , 0,$40, 6, 0} //エスキオ
- &on
- &manmove 2,6,6,6,6,6,6,8,8,8,8,8,8,8,6
- %mandef(2)={$F , 0,$40, 6, -1} //エスキオ
- %mandef(1)={$B , 0,$24, 4, -1} //ダル
- &on
- !o(1)j(2)エスキオj(0);お久しゅうございます。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);お前も変わらぬな。;一体どうしたんだ。pc
- !o(1)j(2)エスキオj(0);はい。w;大事なお話しが…。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);話し?ww;…判かった。;向こうに行こう。p
- %mandef(1)={$B , 0,$28, 2, -1} //ダル
- &on
- !o(1)j(2)ダルj(0);すまないが、ちょっと抜けさせてもらうよ。pc
-
- %mandef(1)={$B , 0,$20, 2, 0} //ダル
- &on
- &contrast 0
- &manmove 1,8,8,8,8
- %mandef(2)={$F , 0,$40, 6, 0} //エスキオ
- &on
- &manmove 2,8,8,8
- %mandef(4)={$9 , 1,$42, 2, -1} //カリス
- %mandef(5)={$A , 1,$62, 2, -1} //リアナ
- %mandef(6)={$F , 1,$25, 2, -1} //子供
- %mandef(31)={$2, 0,$0B, 2, -1} //瓦
- %mandef(32)={$2, 0,$0B, 2, -1} //瓦
- %mandef(33)={$2, 0,$0D, 2, -1} //瓦
- %manpoint(4)={18,14}
- %manpoint(31)={20,4}
- %manpoint(32)={22,4}
- &wait 200
- &manmove 1,-2
- &manmove 2,-2
- %manpoint(1)={13,6}
- %manpoint(2)={13,3}
- %mandef(2)={$F , 0,$40, 2, -1} //エスキオ
- &on
- &contrast 15
- &manmove 1,2,2,2,2,2,6,6,-4
- %mandef(1)={$B , 0,$20, 2, -1} //ダル
- %mandef(2)={$F , 0,$40, 2, 0} //エスキオ
- &on
- &manmove 2,2,2,2,2,2,2,2,2,-6
- %mandef(2)={$F , 0,$40, 2, -1} //エスキオ
- &on
- !o(1)j(2)エスキオj(0);それではすべてが整い次第、またご連絡いたします。pc
- %mandef(4)={$9 , 1,$43, 2, -1} //カリス
- %mandef(5)={$A , 1,$61, 2, -1} //リアナ
- &on
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);わかった。;だが、無理はするな。pc
- !o(1)j(2)エスキオj(0);ありがたきお言葉。;ですが、これも祖国のため。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);…。pc
- !o(1)j(2)エスキオj(0);では、失礼いたします。pc
-
- %mandef(2)={$F , 0,$40, 2, 0} //エスキオ
- &on
- &manmove 2,2,2
- %mandef(1)={$B , 0,$20, 2, 0} //ダル
- &on
- &manmove 1,-2
- %mandef(1)={$B , 0,$20, 2, -1} //ダル
- &on
- &manmove 2,2,2,2,2,2,2,2,2,2,2,4,4,4,4,4,4,4,4,4,4,4,4,4,4
- %mandef(2)={$F , 0,$40, 2, -1} //エスキオ
- %manpoint(2)={100,100}
- %mandef(1)={$B , 0,$20, 2, 0} //ダル
- &on
- &manmove 1,2,2,2,2
- %mandef(1)={$B , 0,$20, 2, -1} //ダル
- &on
-
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ダル、今のは。pc
- %mandef(1)={$B , 0,$20, 2, 0} //ダル
- &on
- &manmove 1,-6
- %mandef(1)={$B , 0,$20, 2, -1} //ダル
- &on
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);ん、wああ。;旧友ってとこだ。w;さあ、それよりさっ
- !さと作業を進めよう。pc
- %mandef(1)={$B , 0,$20, 2, 0} //ダル
- &on
- &manmove 1,2,2,2,2,2
- %mandef(1)={$B , 0,$20, 2, -1} //ダル
- %mandef(4)={$9 , 1,$44, 2, -1} //カリス
- %mandef(5)={$A , 1,$63, 2, -1} //リアナ
- &on
-
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);…なんかあやしいなぁ。pc
-
- &contrast 0
- &wait 300
- &goto IV07_
- //━━━━━━━━━━━━━━━━━━━━━━
- //━━━━━━━━━━━━━━━━━━━━━━
- [IV07_]//エイアム出発
-
- &map MAP\IV07_.MAP //マップの設定
- &mapsp MAP\IV07.SP //BGの設定
- &mappal MAP\IV07.PAL //BGパレットの設定
- %partypoint={12,18,-2}
- &partyspeed 1
-
- %partydef(0) = {$9,1,$E0,0,31,2,0,0, 0, 0}
-
- %mandef(1)={$9 , 0,$80, 8, -1} //カリス
- %mandef(2)={$A , 0,$A0, 8, -1} //リアナ
- %mandef(3)={$B , 0,$20, 2, -1} //ダル
- %mandef(4)={$A , 1,$80, 2, -1} //子供1
- %mandef(5)={$F , 1,$83, 2, -1} //子供2
- %mandef(6)={$B , 1,$84, 2, -1} //母親
- %mandef(7)={$C , 1,$86, 2, -1} //男1
- %mandef(8)={$B , 1,$87, 2, -1} //男2
- %mandef(9)={$F , 1,$88, 2, -1} //男3
- %mandef(10)={$A, 1,$8A, 2, -1} //男4
- %mandef(11)={$A, 1,$8B, 2, -1} //女
- %mandef(12)={$C, 1,$8C, 2, -1} //老人
- %mandef(13)={$F, 1,$8D, 2, -1} //おばさん
- %mandef(14)={$B, 1,$8F, 2, -1} //ジョン
- %mandef(15)={$F, 1,$8E, 2, -1} //マクス
- %mandef(16)={$4, 0,$09, 2, -1} //壁
- %mandef(17)={$5, 0,$0A, 2, -1} //壁
- %mandef(18)={$1, 0,$07, 2, -1} //扉
- %mandef(19)={$1, 0,$08, 2, -1} //扉
- %mandef(20)={$6, 0,$01, 2, -1} //レンガ
- %mandef(21)={$6, 0,$02, 2, -1} //レンガ
- %mandef(22)={$6, 0,$05, 2, -1} //板
- %mandef(23)={$6, 0,$05, 2, -1} //板
-
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);みんな世話になったな、最後まで手伝えなくてすまないけ
- !ど、ほんとありがとう。pc
- !o(1)j(2)町人j(0);あんたらのおかげで、町は救われたよ。p;あとはおれらだけ
- !で大丈夫だ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);みんなと出会えて良かった。;がんばってね。pc
- %mandef(4)={$A , 1,$81, 2, -1} //子供1
- &on
- !o(1)j(2)子供j(0);おねえちゃん、また遊びにきてね。;そしたらさあ、おいらが
- !木登り教えてあげるよ。pc
- %mandef(2)={$A , 0,$A0, 8, 0} //リアナ
- &on
- &manmove 2,-6
- %mandef(2)={$A , 0,$A0, 8, -1} //リアナ
- %mandef(6)={$B , 1,$85, 2, -1} //母親
- &on
- !o(1)j(2)母親j(0);あら、昨日まで「おねえちゃんがいなくなるー」wって泣
- !いてたくせに。pc
- %mandef(4)={$A , 1,$82, 2, -1} //子供1
- &on
- !o(1)j(2)子供j(0);か、w母さん。;言うなよぉ!pc
- %mandef(1)={$9 , 0,$80, 8, 0} //カリス
- &on
- &manmove 1,-6
- %mandef(1)={$9 , 0,$80, 8, -1} //カリス
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);ありがとう、絶対また遊びにくるね。pc
- %mandef(4)={$A , 1,$80, 2, -1} //子供1
- %mandef(6)={$B , 1,$84, 2, -1} //母親
- &on
- !o(1)j(2)子供j(0);うん!pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);本当に2人には感謝している。w;
- !町の者の代表として礼を言うよ。pc
- %mandef(1)={$9 , 0,$80, 8, 0} //カリス
- &on
- &manmove 1,-8
- %mandef(1)={$9 , 0,$80, 8, -1} //カリス
- %mandef(2)={$A , 0,$A0, 8, 0} //リアナ
- &on
- &manmove 2,-8
- %mandef(2)={$A , 0,$A0, 8, -1} //リアナ
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);(あたしの力、こういうことに使っていきたい…)pc
- !o(1)j(2)町人j(0);またいつでもこの町に来てくれ、みんな大歓迎じゃ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ありがとう、それじゃあそろそろ行くよ。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);あっ、お嬢ちゃん。;ひとつ注意して欲しいことがあるんだ。
- !pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);えっ、w何?pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);これから行く聖国オルテニス、特にアルテガでは絶対に魔法
- !を使ってはいけない。p;見つかったら、捕らえられることになる。pc
- %mandef(9)={$F , 1,$89, 2, -1} //男3
- &on
- !o(1)j(2)町人j(0);ああ、あそこじゃ注意したほうがいい。p;坊さんたちは神の
- !奇跡は信じても、人間が生み出した魔法は悪魔の業だと思ってるからな
- !ぁ。pc
- %mandef(9)={$F , 1,$88, 2, -1} //男3
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);捕まれば、ただじゃ済まないってことか。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);そ、wそうなの。;わかった気をつける…。pc
- &monsprint 24,32,ダル
- !o(1)j(2)ダルj(0);ああ気を付けてくれ。w;それじゃ達者でな。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(下手なことに巻き込まれないように注意しないとな)p
- !o(1)j(2)カリスj(0);そっちも。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);ありがとう、バイバーイ。p
- !o(1)j(2)リアナj(0);(アルテガかぁ、ちょっと恐いな…)pc
- %mandef(1)={$9 , 0,$80, 8, 0} //カリス
- &on
- &manmove 1,2,2,2,2
- %mandef(1)={$9 , 0,$80, 8, -1} //カリス
- %mandef(2)={$A , 0,$A0, 8, 0} //リアナ
- &on
- &manmove 2,4,-2
- %partydef(1) = {$9,0,$80,0,-1,0,-1,-1,-1,-1}
- %partydef(2) = {$A,0,$A0,1,-1,1,-1,-1,-1,-1}
- &partyset 1,2
- %manpoint(1)={100,100}
- %manpoint(2)={100,100}
- &on
- &partymove 2,2,2,2,2
- &contrast 0
- &partymove 4,4,4,4,4,4,4,4,4,4
-
- %partydef(0) = { $9, 0,$00, 0,31, 2, 0, 0, 0, 0}
- %partydef(1) = {$9,0,$20,0,-1,0,-1,-1,-1,-1}
- %partydef(2) = {$A,0,$40,1,-1,1,-1,-1,-1,-1}
- &partyspeed 2
- 進行=13
- 町中=1
- &goto MATI2
- //━━━━━━━━━━━━━━━━━━━━━━
- //━━━━━━━━━━━━━━━━━━━━━━
- [IV08]//街道の狼 宣教師
- &bgm 23
- &sppsp CHR\IV08.SPP //SPP(人/スプライト)ファイルを設定
- &map MAP\IV08.MAP //マップの設定
- &mapsp MAP\IV08.SP //BGの設定
- &mappal MAP\IV08.PAL //BGパレットの設定
- %partypoint={31,0,2}
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1)={$9 , 0,$20, 4, -1} //カリス
- %mandef(2)={$A , 0,$40, 4, -1} //リアナ
- %mandef(3)={$B , 0,$60, 4, -1} //ルシェル
-
- %mandef(4)={$2 , 0,$84, 2, 0} //狼
- %mandef(5)={$2 , 0,$80, 2, 0} //狼
- %mandef(6)={$2 , 0,$8C, 2, 0} //狼
- %mandef(7)={$2 , 0,$88, 2, 0} //狼
- %mandef(8)={$2 , 0,$A4, 2, 0} //狼
- %mandef(9)={$2 , 0,$A0, 2, 0} //狼
-
-
- &on
- &wait 20
- &monsprint 24,32,ルシェル
- !o(1)j(2)少女j(0);いやっ!w;来ないで!w
- !o(1)j(2)少女j(0);(神よ、お助け下さい!)pc
-
- &wait 50
-
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);カリス!w;あれっ!pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);リアナはあの娘をっ!pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);うん!pc
- %mandef(1)={$9 , 0,$20, 4, 1} //カリス
- &on
- &manmove 1,4,4,4,4,4,4,4,4,4
- %mandef(1)={$9 , 0,$20, 4, -1} //カリス
- %mandef(2)={$A , 0,$40, 4, 1} //リアナ
- &on
- &manmove 2,4,4,4,4,4,4
- %mandef(2)={$A , 0,$40, 4, -1} //リアナ
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);さあ、こっちに。pc
- %mandef(3)={$B , 0,$60, 4, 0} //ルシェル
- &on
- &manmove 3,-6
- %mandef(3)={$B , 0,$60, 4, -1} //ルシェル
- &on
- &monsprint 24,32,ルシェル
- !o(1)j(2)少女j(0);えっ!w;あっ、wはいっ!pc
- %mandef(3)={$B , 0,$60, 4, 1} //ルシェル
- &on
- &manmove 3,6,6,6,6,6,-4
- %mandef(3)={$B , 0,$60, 4, -1} //ルシェル
- &on
- %mandef(1)={$9 , 0,$20, 4, 1} //カリス
- &on
- &manmove 1,4,4,2,2,4,4
- %mandef(1)={$9 , 0,$20, 4, -1} //カリス
- &partyout 2
- &on
- &patternpal GR\CG2.PAL //モンスター用パレット
- &bgm 0
- &pcm 9
-
- &battle $1000,14,オオカミ,3
- &patternpal GR\CG.PAL //CG用パレット
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &bgm 23
- &partyin 2
- %manpoint(4)={100,100}
- %manpoint(5)={100,100}
- &wait 5
- &on
- %manpoint(6)={100,100}
- %manpoint(7)={100,100}
- &wait 5
- &on
- %manpoint(8)={100,100}
- %manpoint(9)={100,100}
- &wait 5
- &on
-
- %mandef(1)={$9 , 0,$20, 4, 1} //カリス
- &on
- &manmove 1,6,6,6,6
- %mandef(1)={$9 , 0,$20, 4, -1} //カリス
- &on
-
- %mandef(3)={$B , 0,$60, 4, 1} //ルシェル
- &on
- &manmove 3,2,2,2,-8
- %mandef(3)={$B , 0,$60, 4, -1} //ルシェル
- &on
-
- %mandef(1)={$9 , 0,$20, 4, 1} //カリス
- &on
- &manmove 1,-2
- %mandef(1)={$9 , 0,$20, 4, -1} //カリス
- %mandef(2)={$A , 0,$40, 4, 1} //リアナ
- &on
- &manmove 2,-2
- %mandef(2)={$A , 0,$40, 4, -1} //リアナ
- &on
-
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);怪我は無いようだな。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)少女j(0);はい、危ないところをありがとうございました。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);いくら昼間でも、女一人で出歩くのは危険だぜ。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)少女j(0);はい…。w;あっ、私ルシェルと申します。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);あたしはリアナ。w;で、こっちカリスね。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);私、アルテガから他の神父様たちと共にオルトン教の教
- !えを説くために、アザム国へ向かっていたのですが。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(アザム…)p
- !o(1)j(2)カリスj(0);オルトン教っていうのは…。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);えっ、wオルトン教をご存じ無いのですか。p;オルトン教
- !とは遥か昔、聖者オルトンが神と意識的融合を遂げ、神の秩序を教義と
- !したものであって、それ…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああっ、w長くなりそうだ。w;それで他の神父様ってのはど
- !うしたんだ。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);はい、私は途中で体調が悪くなり、そこのセフラの町で休
- !んでいて。p;それで他の神父様たちはこの北のアザムとの国境で待って下
- !さっているのです。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);で、wそこへ行こうとしたらこうなったわけね。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);はい、本当にありがとうございました。w;それでは、私
- !急ぎますので、失礼致します。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);うん、気を付けてね。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);ありがとうございます。;あなた方に神の御加護があらん
- !ことを。pc
- %mandef(3)={$B , 0,$60, 4, 1} //ルシェル
- &on
- &manmove 3,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6
- %mandef(3)={$B , 0,$60, 4, -1} //ルシェル
- %manpoint(3)={100,100}
- %mandef(1)={$9 , 0,$20, 4, 0} //カリス
- %mandef(2)={$A , 0,$40, 4, 0} //リアナ
- &on
- &manmove 1,-6
- &manmove 2,-6
- %mandef(1)={$9 , 0,$20, 4, -1} //カリス
- %mandef(2)={$A , 0,$40, 4, -1} //リアナ
- &on
- // ルシェル画面外へ
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ちょっと肩がこる喋り方をするなぁ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);…大丈夫かなぁ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);街道沿いだ、そうそう今みたいに狼が襲ってくるってこと
- !もないだろ。pc
- %mandef(2)={$A , 0,$40, 4, 0} //リアナ
- &on
- &manmove 2,-4
- %mandef(2)={$A , 0,$40, 4, -1} //リアナ
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);うん。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);町が近いみたいだ。;今日は休んで行こう。pc
- 進行=16
- &goto2 FIELD,154,42,4
- &&
- //━━━━━━━━━━━━━━━━━━━━━━
- //━━━━━━━━━━━━━━━━━━━━━━
- [IV09]//犬探し 宣教師2
- &ldef 会話1
- &ldef 会話2
- &ldef 会話3
- &ldef 会話4
- &ldef 会話5
- &ldef 会話6
- &ldef 会話7
- &ldef 会話8
- &bgm 28
- &sppsp CHR\IV09.SPP //SPP(人/スプライト)ファイルを設定
- &map MAP\IV09.MAP //マップの設定
- &mapsp MAP\IV09.SP //BGの設定
- &mappal MAP\IV09.PAL //BGパレットの設定
- &partyset 1
- &partyspeed 1
- %partypoint={1,50,6}
-
- &ldef 犬だらけ
- &ldef 仲間1=100
- &ldef 仲間2=100
- &ldef 仲間3=100
- &ldef 仔犬0
- &ldef 仔犬1
- &ldef 仔犬2
- &ldef 仔犬3
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1) ={$D, 0,$04, 2, 0} //少年
- %mandef(2) ={$A, 0,$80, 6, 0} //リアナ
- %mandef(3) ={$B, 0,$A0, 2, 1} //仔犬(本物)
- %mandef(4) ={$B, 0,$C0, 2, 2} //仔犬(本物)
- %mandef(5) ={$B, 0,$E0, 2, 3} //仔犬(本物)
- %mandef(6) ={$B, 1,$00, 2, 1} //仔犬
- %mandef(7) ={$B, 1,$20, 2, 2} //仔犬
- %mandef(8) ={$B, 1,$40, 2, 3} //仔犬
- %mandef(9) ={$B, 1,$60, 2, 1} //仔犬
- %mandef(10)={$B, 1,$80, 2, 2} //仔犬
- %mandef(11)={$B, 1,$A0, 2, 3} //仔犬
- %mandef(12)={$B, 1,$C0, 2, 0} //仔犬
- %mandef(13)={$B, 1,$E0, 2, 1} //仔犬
- %mandef(14)={$8, 2,$00, 2, 1} //町人 女
- %mandef(15)={$C, 2,$20, 4, 2} //町人
- %mandef(16)={$F, 2,$40, 6, 3} //町人
- %mandef(17)={$F, 2,$60, 8, 4} //町人
- %mandef(18)={$7, 2,$80, 2, 1} //町人 男
- %mandef(19)={$8, 2,$A0, 4, 2} //町人
- %mandef(20)={$E, 2,$C0, 6, 3} //町人
- %mandef(21)={$7, 2,$E0, 8, 4} //町人
-
- &on
- !o(1)j(2)少年j(0);うぇ~ん!w;うぇ~ん!pc
- &manmove 2,6,6,6,6,6,6
- %mandef(2) ={$A, 0,$80, 6, -1} //リアナ
- &monsprint 160,32,リアナ1
- !o(1)j(2)リアナj(0);ねえ、どうしたの?pc
- %mandef(1) ={$D, 0,$6C, 2, -1} //少年
- &on
- !o(1)j(2)少年j(0);うっ、w僕の仔犬がいなくなちゃったんだ…。pc
- &monsprint 160,32,リアナ1
- !o(1)j(2)リアナj(0);そうなんだ。ww;大丈夫!;wおねえちゃんが探してあげる。pc
- &partymove 6,6,6,6,6,6,-8
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);リアナ。w;あんまりお人好し過ぎるのもどうかと思うぞ。p
- !;ダルの忠告にもあったとおり、この国じゃおとなしくしてたほうがい
- !い。pc
- %mandef(2) ={$A, 0,$80, 2, 0} //リアナ
- &on
- &manmove 2,-2
- %mandef(2) ={$A, 0,$80, 2, -1} //リアナ
- &on
- &monsprint 160,32,リアナ1
- !o(1)j(2)リアナj(0);…wわかった。;じゃあ、カリスが仔犬を探してきて、あた
- !しはこの子をみてるから。pc
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);はっ…?ww;わ、wわかったよ。w;まったく今日は厄日だぜ
- !。w;神の御加護に感謝しなくちゃな。p;で、仔犬ってのはどんなのなん
- !だ?pc
- %mandef(1) ={$D, 0,$00, 2, 0} //少年
- &on
- !o(1)j(2)少年j(0);みみがパタパタしてるのと、白いのと茶色の。pc
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);wはあ?;なんだよそれは…。;しかも3匹かよ。pc
- &monsprint 160,32,リアナ1
- !o(1)j(2)リアナj(0);はいはい、文句言わないで探してきて。pc
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);wはあ、じゃあいってくるよ。pc
- !o(1)j(2)少年j(0);うん。pc
- &monsprint 160,32,リアナ1
- !o(1)j(2)リアナj(0);いってらっしゃーい♪pc
- %mandef(2) ={$A, 0,$80, 2, 0} //リアナ
- &on
- &partyspeed 2
-
- #@0 &if(%direc<0 and 犬だらけ==0){
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);wちょ、wちょっと待てよ。p
- !o(1)j(2)カリスj(0);(なんだこの町は犬だらけじゃないか!;はあ、と
- !にかく3匹ずつひっつかまえていくか…)pc
- 犬だらけ=1
- }
-
- #1 //少年
- &if(%partynumber>1){
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);ほら、君の犬はいるかい?pc
- &if(仲間1<6){
- !o(1)j(2)少年j(0);あっ、僕の犬だ!pc
- &partyout 9
- &if(仲間1==3){%manpoint(3)={8,44}}
- &if(仲間1==4){%manpoint(4)={10,44}}
- &if(仲間1==5){%manpoint(5)={12,44}}
- }&else{
- !o(1)j(2)少年j(0);これ、僕の犬じゃないよ。pc
- &partyout 9
- %manpoint(仲間1)={14,46}
- }
- &on
- &if(仲間2<100){
- &if(仲間2<6){
- !o(1)j(2)少年j(0);あっ、僕の犬だ!pc
- &partyout 10
- &if(仲間2==3){%manpoint(3)={8,44}}
- &if(仲間2==4){%manpoint(4)={10,44}}
- &if(仲間2==5){%manpoint(5)={12,44}}
- }&else{
- !o(1)j(2)少年j(0);これ、僕の犬じゃないよ。pc
- &partyout 10
- %manpoint(仲間2)={14,48}
- }
- }
- &on
- &if(仲間3<100){
- &if(仲間3<6){
- !o(1)j(2)少年j(0);あっ、僕の犬だ!pc
- &partyout 11
- &if(仲間3==3){%manpoint(3)={8,44}}
- &if(仲間3==4){%manpoint(4)={10,44}}
- &if(仲間3==5){%manpoint(5)={12,44}}
- }&else{
- !o(1)j(2)少年j(0);これ、僕の犬じゃないよ。pc
- &partyout 11
- %manpoint(仲間3)={14,50}
- }
- }
- &on
- 仲間2=100
- 仲間3=100
- }
-
- &if(仔犬0<3){
- &if(仔犬0==0){
- !o(1)j(2)少年j(0);僕の犬はみみがパタパタしてるのと、白い
- !のと茶色のだよ。pc
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);了解。pc
- }&else{
- !o(1)j(2)少年j(0);おにいちゃん、あとf(3-仔犬0)匹だよ。;
- !おねがい頑張って。pc
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);了解。pc
- }
- }
- &manmove 1,-2
- &if(仔犬0==3){ //全部の犬を見つけた
- &mappal MAP\IV09B.PAL //BGパレットの設定
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);これで全部だな。pc
- !o(1)j(2)少年j(0);うんっ、wありがとう。w;おにいちゃん、おねえちゃ
- !ん。pc
- &manmove 2,-6
- %mandef(2) ={$A, 0,$80, 6, -1} //リアナ
- &on
- &monsprint 160,32,リアナ1
- !o(1)j(2)リアナj(0);良かったね。;さあ、暗くなってきたからお家にお
- !帰り。pc
- %mandef(1) ={$D, 0,$6C, 2, -1} //少年
- &on
- &if(%gold<200){
- !o(1)j(2)少年j(0);あ、これ僕の気持ち。;受け取って。pc
- &monsprint 160,32,リアナ1
- !o(1)j(2)リアナj(0);えっ!w;って500Gも!w;ど、どうし
- !たのこんな大金!pc
- !o(1)j(2)少年j(0);仔犬のエサ代にパパにもらったんだ。pc
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);子供が持っている金額じゃないぞ!pc
- !o(1)j(2)少年j(0);僕の家、お金持ちだから気にしなくていいよ
- !。w;それじゃあね。pc
- %manpoint(3)={1000,1000}
- %manpoint(4)={1000,1000}
- %manpoint(5)={1000,1000}
- %mandef(1) ={$D, 0,$00, 6, 0} //少年
- &on
- &if(%py==48){&partymove 2,2,-8}
- &if(%py==49){&partymove 2,-8}
- &manmove 1,6,6,6,6,6,6,6,6,6
- &monsprint 160,32,リアナ1
- !o(1)j(2)リアナj(0);…。ww;あっ、wちょ、wちょっと!;こん
- !な大金もらえないよ!pc
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);もらっておいていいんじゃないか。p;ち
- !ょうど宿代もピンチだし、それにけっこうな労働だ
- !ったんだぜ。pc
- &monsprint 160,32,リアナ1
- !o(1)j(2)リアナj(0);でも…。w;ふう、wこんな見返りが欲しく
- !てじゃないのに…。pc
- %gold=%gold+500
- }&else{
- !o(1)j(2)少年j(0);じゃあね。pc
- %manpoint(3)={1000,1000}
- %manpoint(4)={1000,1000}
- %manpoint(5)={1000,1000}
- %mandef(1) ={$D, 0,$00, 6, 0} //少年
- &on
- &if(%py==48){&partymove 2,2,-8}
- &if(%py==49){&partymove 2,-8}
- &manmove 1,6,6,6,6,6,6,6,6,6
- }
- &contrast 0
- &wait 200
- %manpoint(1)={1000,1000}
- %manpoint(2)={8,47}
- %mandef(2) ={$A, 0,$80, -6, -1} //リアナ
- %mandef(22)={$B, 0,$60, 6, 0} //ルシェル
- %manpoint(22)={0,49}
- &move 9,51,8
- &manmove 22,6,6
- %mandef(22)={$B, 0,$60, 6, -1} //ルシェル
- &on
- &monsprint 160,32,ルシェル
- !o(1)j(2)ルシェルj(0);はあwはあ。w;誰かー!;w誰かー!pc
- %mandef(2) ={$A, 0,$80, 6, 0} //リアナ
- &on
- &manmove 2,-4
- %mandef(2) ={$A, 0,$80, 4, -1} //リアナ
- &on
- &monsprint 160,32,リアナ1
- !o(1)j(2)リアナj(0);カリス、あれ。pc
- &partymove -4
- %mandef(22)={$B, 0,$60, 6, 0} //ルシェル
- &on
- &manmove 22,6,6,6,6
- %mandef(22)={$B, 0,$60, 6, -1} //ルシェル
- &on
- &monsprint 160,32,ルシェル
- !o(1)j(2)ルシェルj(0);あっ、w昼間の方々。pc
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);おいっ、どうしたんだ。pc
- &monsprint 160,32,ルシェル
- !o(1)j(2)ルシェルj(0);ああ、神父様たちが。;どうしてあんなことに、
- !おお神よ。pc
- %mandef(22)={$B, 0,$60, 6, 0} //ルシェル
- &on
- &manmove 22,6,6,6,6
- %mandef(22)={$B, 0,$60, 6, -1} //ルシェル
- &on
- &partymove -6
- %mandef(2) ={$A, 0,$80, 4, 0} //リアナ
- &on
- &manmove 2,-6
- %mandef(2) ={$A, 0,$80, 6, -1} //リアナ
- &on
- &monsprint 160,32,リアナ1
- !o(1)j(2)リアナj(0);ねえ、落ち着いて。pc
- &monsprint 160,32,ルシェル
- !o(1)j(2)ルシェルj(0);そうだわ。;ここには聖騎士団の常駐軍が…。;
- !ああ、なんてことなのかしら。pc
- %mandef(22)={$B, 0,$60, 6, 1} //ルシェル
- &on
- &manmove 22,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6
- %manpoint(22)={1000,1000}
- &on
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);かなり混乱してるな。pc
- &monsprint 160,32,リアナ1
- !o(1)j(2)リアナj(0);ほんと、どうしたのかしら。pc
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);なんにしても、これ以上かかわるのはよそう。pc
- %mandef(2) ={$A, 0,$80, 6, 0} //リアナ
- &on
- &manmove 2,-2
- %mandef(2) ={$A, 0,$80, 6, -1} //リアナ
- &on
- &monsprint 160,32,リアナ1
- !o(1)j(2)リアナj(0);えっw…ええ。pc
- 町=3
- 進行=17
- &partyset 1,2
- &goto MATI3
- }
-
- #2 //リアナ
- &monsprint 160,32,リアナ1
- !o(1)j(2)リアナj(0);カリス、頑張ってね!pc
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);へいへい。pc
- &manmove 2,-2
- #3 //仔犬(本物)
- !o(1)j(2)仔犬j(0);キャン! キャン!pc
- &if(仔犬1==0){
- &if(%partynumber<4){
- %mandef(3) ={$B,0,$A0,2,0} //仔犬(本物)
- %manpoint(%manno)={80,2}
- &if(%partynumber==3){
- %partydef(11) = {$B,0,$A0,6,1,0,0,0,0,-1}
- &partyin 11
- 仲間3=%manno
- }
- &if(%partynumber==2){
- %partydef(10) = {$B,0,$A0,6,1,0,0,0,0,-1}
- 仲間1=%manno
- &partyin 10
- 仲間2=%manno
- }
- &if(%partynumber==1){
- %partydef(9) = {$B,0,$A0,6,1,0,0,0,0,-1}
- &partyin 9
- 仲間1=%manno
- }
- &on
- 仔犬1=1
- 仔犬0++
- }
- }
- &manmove %manno,-2
- #4 //仔犬(本物)
- !o(1)j(2)仔犬j(0);ワォン! ワォン!pc
- &if(仔犬2==0){
- &if(%partynumber<4){
- %mandef(4) ={$B,0,$C0,2,0} //仔犬(本物)
- %manpoint(%manno)={80,2}
- &if(%partynumber==3){
- %partydef(11) = {$B,0,$C0,6,1,0,0,0,0,-1}
- &partyin 11
- 仲間3=%manno
- }
- &if(%partynumber==2){
- %partydef(10) = {$B,0,$C0,6,1,0,0,0,0,-1}
- &partyin 10
- 仲間2=%manno
- }
- &if(%partynumber==1){
- %partydef(9) = {$B,0,$C0,6,1,0,0,0,0,-1}
- &partyin 9
- 仲間1=%manno
- }
- &on
- 仔犬2=1
- 仔犬0++
- }
- }
- &manmove %manno,-2
- #5 //仔犬(本物)
- !o(1)j(2)仔犬j(0);ヒャン! ヒャン!pc
- &if(仔犬3==0){
- &if(%partynumber<4){
- %mandef(5) ={$B,0,$E0,2,0} //仔犬(本物)
- %manpoint(%manno)={80,2}
- &if(%partynumber==3){
- %partydef(11) = {$B,0,$E0,6,1,0,0,0,0,-1}
- &partyin 11
- 仲間3=%manno
- }
- &if(%partynumber==2){
- %partydef(10) = {$B,0,$E0,6,1,0,0,0,0,-1}
- &partyin 10
- 仲間2=%manno
- }
- &if(%partynumber==1){
- %partydef(9) = {$B,0,$E0,6,1,0,0,0,0,-1}
- &partyin 9
- 仲間1=%manno
- }
- &on
- 仔犬3=1
- 仔犬0++
- }
- }
- &manmove %manno,-2
- #6 //仔犬
- !o(1)j(2)仔犬j(0);ニュン! ニュン!pc
- &if(%partynumber<4){
- %mandef(6) ={$B,1,$00,2,1} //仔犬
- %manpoint(%manno)={80,2}
- &if(%partynumber==3){
- %partydef(11) = {$B,1,$00,6,1,0,0,0,0,-1}
- &partyin 11
- 仲間3=%manno
- }
- &if(%partynumber==2){
- %partydef(10) = {$B,1,$00,6,1,0,0,0,0,-1}
- &partyin 10
- 仲間2=%manno
- }
- &if(%partynumber==1){
- %partydef(9) = {$B,1,$00,6,1,0,0,0,0,-1}
- &partyin 9
- 仲間1=%manno
- }
- &on
- }
- #7 //仔犬
- !o(1)j(2)仔犬j(0);ラン! ラン!pc
- &if(%partynumber<4){
- %mandef(7) ={$B,1,$20,2,2} //仔犬
- %manpoint(%manno)={80,2}
- &if(%partynumber==3){
- %partydef(11) = {$B,1,$20,6,1,0,0,0,0,-1}
- &partyin 11
- 仲間3=%manno
- }
- &if(%partynumber==2){
- %partydef(10) = {$B,1,$20,6,1,0,0,0,0,-1}
- &partyin 10
- 仲間2=%manno
- }
- &if(%partynumber==1){
- %partydef(9) = {$B,1,$20,6,1,0,0,0,0,-1}
- &partyin 9
- 仲間1=%manno
- }
- &on
- }
- #8 //仔犬
- !o(1)j(2)仔犬j(0);バウ! バウ!pc
- &if(%partynumber<4){
- %mandef(8) ={$B,1,$40,2,3} //仔犬
- %manpoint(%manno)={80,2}
- &if(%partynumber==3){
- %partydef(11) = {$B,1,$40,6,1,0,0,0,0,-1}
- &partyin 11
- 仲間3=%manno
- }
- &if(%partynumber==2){
- %partydef(10) = {$B,1,$40,6,1,0,0,0,0,-1}
- &partyin 10
- 仲間2=%manno
- }
- &if(%partynumber==1){
- %partydef(9) = {$B,1,$40,6,1,0,0,0,0,-1}
- &partyin 9
- 仲間1=%manno
- }
- &on
- }
- #9 //仔犬
- !o(1)j(2)仔犬j(0);ハオ! ハオ!pc
- &if(%partynumber<4){
- %mandef(9) ={$B,1,$60,2,1} //仔犬
- %manpoint(%manno)={80,2}
- &if(%partynumber==3){
- %partydef(11) = {$B,1,$60,6,1,0,0,0,0,-1}
- &partyin 11
- 仲間3=%manno
- }
- &if(%partynumber==2){
- %partydef(10) = {$B,1,$60,6,1,0,0,0,0,-1}
- &partyin 10
- 仲間2=%manno
- }
- &if(%partynumber==1){
- %partydef(9) = {$B,1,$60,6,1,0,0,0,0,-1}
- &partyin 9
- 仲間1=%manno
- }
- &on
- }
- #10 //仔犬
- !o(1)j(2)仔犬j(0);ワン! ワン!pc
- &if(%partynumber<4){
- %mandef(10)={$B,1,$80,2,2} //仔犬
- %manpoint(%manno)={80,2}
- &if(%partynumber==3){
- %partydef(11) = {$B,1,$80,6,1,0,0,0,0,-1}
- &partyin 11
- 仲間3=%manno
- }
- &if(%partynumber==2){
- %partydef(10) = {$B,1,$80,6,1,0,0,0,0,-1}
- &partyin 10
- 仲間2=%manno
- }
- &if(%partynumber==1){
- %partydef(9) = {$B,1,$80,6,1,0,0,0,0,-1}
- &partyin 9
- 仲間1=%manno
- }
- &on
- }
- #11 //仔犬
- !o(1)j(2)仔犬j(0);フォン! ファン!pc
- &if(%partynumber<4){
- %mandef(11)={$B,1,$A0,2,3} //仔犬
- %manpoint(%manno)={80,2}
- &if(%partynumber==3){
- %partydef(11) = {$B,1,$A0,6,1,0,0,0,0,-1}
- &partyin 11
- 仲間3=%manno
- }
- &if(%partynumber==2){
- %partydef(10) = {$B,1,$A0,6,1,0,0,0,0,-1}
- &partyin 10
- 仲間2=%manno
- }
- &if(%partynumber==1){
- %partydef(9) = {$B,1,$A0,6,1,0,0,0,0,-1}
- &partyin 9
- 仲間1=%manno
- }
- &on
- }
- #12 //仔犬
- !o(1)j(2)仔犬j(0);クゥ! クゥ!pc
- &if(%partynumber<4){
- %mandef(12)={$B,1,$C0,2,1} //仔犬
- %manpoint(%manno)={80,2}
- &if(%partynumber==3){
- %partydef(11) = {$B,1,$C0,6,1,0,0,0,0,-1}
- &partyin 11
- 仲間3=%manno
- }
- &if(%partynumber==2){
- %partydef(10) = {$B,1,$C0,6,1,0,0,0,0,-1}
- &partyin 10
- 仲間2=%manno
- }
- &if(%partynumber==1){
- %partydef(9) = {$B,1,$C0,6,1,0,0,0,0,-1}
- &partyin 9
- 仲間1=%manno
- }
- &on
- }
- #13 //仔犬
- !o(1)j(2)仔犬j(0);モン! モン!pc
- &if(%partynumber<4){
- %mandef(13)={$B,1,$E0,2,1} //仔犬
- %manpoint(%manno)={80,2}
- &if(%partynumber==3){
- %partydef(11) = {$B,1,$E0,6,1,0,0,0,0,-1}
- &partyin 11
- 仲間3=%manno
- }
- &if(%partynumber==2){
- %partydef(10) = {$B,1,$E0,6,1,0,0,0,0,-1}
- &partyin 10
- 仲間2=%manno
- }
- &if(%partynumber==1){
- %partydef(9) = {$B,1,$E0,6,1,0,0,0,0,-1}
- &partyin 9
- 仲間1=%manno
- }
- &on
- }
- #14 //女の子
- &if(会話1==3){
- !o(1)j(2)女の子j(0);わんわん冝@わんわん侊c
- }
- &if(会話1==2){
- !o(1)j(2)女の子j(0);わんわん大好きだけど、わんわんのうんち臭いの。pc
- 会話1++
- }
- &if(会話1==1){
- !o(1)j(2)女の子j(0);おにいちゃんも、わんわん好き?pc
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);いや、オレはちょっと…。pc
- !o(1)j(2)女の子j(0);おにいちゃん、わんわんキライなの…?pc
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);いやっ、好きだよ!好き!w;
- !(あー、オレ何やってるんだ…)pc
- !o(1)j(2)女の子j(0);テヘヘ、おにいちゃんもあたちと一緒でわんわん大好きー!pc
- 会話1++
- }
- &if(会話1==0){
- !o(1)j(2)女の子j(0);わんわんいっぱい、かーいいなぁ侊c
- 会話1++
- }
- #15 //若者 女
- &if(会話2==3){
- !o(1)j(2)女j(0);旅のお方、ごきげんよう。pc
- }
- &if(会話2==2){
- !o(1)j(2)女j(0);なんでも、聖者オルトンが犬を連れて旅をしていたそうよ。p;
- !アルテガに行けば、聖者オルトンと聖犬ルクターブの像が見られるわよ。pc
- 会話2++
- }
- &if(会話2==1){
- !o(1)j(2)女j(0);オルトン教では犬は聖なる生き物とされているのよ。pc
- 会話2++
- }
- &if(会話2==0){
- !o(1)j(2)女j(0);あら、旅の方ですか、犬が多くてびっくりされたでしょう。pc
- 会話2++
- }
-
- #16 //おばさん1
- &if(会話3==3){
- !o(1)j(2)主婦j(0);あら、まだ何かご用。pc
- }
- &if(会話3==2){
- !o(1)j(2)主婦j(0);フンの臭いもそうだけど、家の中に入ってきて、食べ物を漁って
- !いったりもするのよ。p;こまったものだわ。pc
- 会話3++
- }
- &if(会話3==1){
- !o(1)j(2)主婦j(0);さすがにこの多さはたまらないわ。pc
- 会話3++
- }
- &if(会話3==0){
- !o(1)j(2)主婦j(0);犬は、嫌いじゃないのだけどもねぇ。pc
- 会話3++
- }
-
- #17 //おばさん2
- &if(会話4==3){
- !o(1)j(2)おばさんj(0);ああ、神のご加護を。pc
- }
- &if(会話4==2){
- !o(1)j(2)おばさんj(0);アザムからの旅人や商人は見かけないし、アザムへ向かっ
- !た者たちも戻ってきてないのよ。p;
- !神父様達に何もなければ良いのだけれども。pc
- 会話4++
- }
- &if(会話4==1){
- !o(1)j(2)おばさんj(0);神父様達、アザムへ向かわれるそうだけど。;最近、どうも
- !アザムの様子がおかしいらしいのよ。pc
- 会話4++
- }
- &if(会話4==0){
- !o(1)j(2)おばさんj(0);そういえば、この間アルテガから宣教の神父様たちがおた
- !ち寄りになられたねぇ。pc
- 会話4++
- }
-
- #18 //男の子
- &if(会話5==3){
- !o(1)j(2)男の子j(0);おにいちゃんぐらいになったら、この町を絶対出てやるんだ。
- !pc
- }
- &if(会話5==2){
- !o(1)j(2)男の子j(0);だって道を歩いていればウンチを踏んじゃうし、突然僕のこ
- !とを追いかけて来るんだもん。pc
- 会話5++
- }
- &if(会話5==1){
- !o(1)j(2)男の子j(0);大きな声じゃ言えないけど、犬って嫌いなんだよなぁ。pc
- 会話5++
- }
- &if(会話5==0){
- !o(1)j(2)男の子j(0);犬だらけ、僕こんな町嫌だよぉ。pc
- 会話5++
- }
-
- #19 //若者 男
- &if(会話6==3){
- !o(1)j(2)若者j(0);まあ、俺ごとき庶民が詮索したところでどうしようもないか、
- !与えられたものを受け入れるしかない。pc
- }
- &if(会話6==2){
- !o(1)j(2)若者j(0);アザム国については、聖騎士団も何かつかんでるはずなんだが、
- !一体どうなってるんだか。pc
- 会話6++
- }
- &if(会話6==1){
- !o(1)j(2)若者j(0);アザムからの物流はここ最近途絶えているし、アザムの先王が
- !亡くなってしばらく経ってからだよな、確か。pc
- 会話6++
- }
- &if(会話6==0){
- !o(1)j(2)若者j(0);最近のアザム国の動きがどうも怪しいなぁ。pc
- 会話6++
- }
-
- #20 //神父
- &if(会話7==3){
- !o(1)j(2)神父j(0);…。;(侮辱するのもいい加減にしてほしい)pc
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);(怒らせてしまったみたいだ)pc
- }
- &if(会話7==2){
- !o(1)j(2)神父j(0);こんどこそ、神の教えを聞きにいらしたのですね。pc
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);いや、済まないけど。;(だから、何をしてるんだオレは)pc
- !o(1)j(2)神父j(0);そうですか…。;(謝るなら、話しかけないで欲しいものだ)pc
- 会話7++
- }
- &if(会話7==1){
- !o(1)j(2)神父j(0);神の教えを聞きにいらしたのですね。pc
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);いや、違うんだ。;(何をしてるんだオレは)pc
- !o(1)j(2)神父j(0);そうですか、ではまた。pc
- 会話7++
- }
- &if(会話7==0){
- !o(1)j(2)神父j(0);おや、旅の方ですか。;失礼ですが、オルトン教の信者ではあり
- !ませんね。pc
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);ああ。;(やばい気がする、さっさと立ち去ろう)pc
- !o(1)j(2)神父j(0);ちょっ…。pc
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);悪いが、急いでるんで。pc
- !o(1)j(2)神父j(0);それは残念。;またお時間がある時にゆっくりお話しましょう。pc
- 会話7++
- }
-
- #21 //お爺さん
- &if(会話8==3){
- !o(1)j(2)老人j(0);ええ気分じゃのう。pc
- }
- &if(会話8==2){
- !o(1)j(2)老人j(0);ええ日和じゃのう。pc
- 会話8++
- }
- &if(会話8==1){
- !o(1)j(2)老人j(0);ええ陽気じゃのう。pc
- 会話8++
- }
- &if(会話8==0){
- !o(1)j(2)老人j(0);ええ天気じゃのう。pc
- 会話8++
- }
- //━━━━━━━━━━━━━━━━━━━━━━
- //━━━━━━━━━━━━━━━━━━━━━━
- [IV10]//図書館前
- &bgm 31
- &sppsp CHR\IV10.SPP
- &map MAP\IV10.MAP //マップの設定
- &mapsp MAP\IV10.SP //BGの設定
- &mappal MAP\IV10.PAL //BGパレットの設定
- %partypoint={0,0,2}
-
- &if(進行==21){
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1)={$9 , 0,$A0, 2, -1} //カリス
- %mandef(2)={$A , 0,$20, 2, -1} //リアナ
- %mandef(3)={$F , 0,$80, 4, -1} //伯爵
- }&else{
- %mandef(10)={$9 , 0,$00, 2, -1} //カリス
- %manpoint(10)={18,14}
- %mandef(11)={$A , 0,$20, 2, -1} //リアナ
- %manpoint(11)={15,8}
-
- }
-
- &on
-
- &if(進行==21){
- %mandef(2)={$A , 0,$20, 2, 0} //リアナ
- &on
- &manmove 2,2,2,2,2
- %mandef(2)={$A , 0,$20, 2, -1} //リアナ
- %mandef(1)={$9 , 0,$A0, 2, 0} //カリス
- &on
- &manmove 1,2,2
- %mandef(1)={$9 , 0,$A0, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…。pc
- %mandef(2)={$A , 0,$20, 2, 0} //リアナ
- &on
- &manmove 2,-8
- %mandef(2)={$A , 0,$20, 2, -1} //リアナ
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);…もう、入館許可証が無いと入れないなんて。p;
- !しかも、このアルテガに在住している者か聖職者じゃないと、
- !入館許可証を発行してくれないっていうじゃない。pc
- %mandef(1)={$9 , 0,$A0, 2, 0} //カリス
- &on
- &manmove 1,2,2,2,2,2,2,2,2,2,2
- %mandef(1)={$9 , 0,$C0, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ここまで来たのに…。pc
- %mandef(2)={$A , 0,$20, 2, 0} //リアナ
- &on
- &manmove 2,-2
- %mandef(2)={$A , 0,$C1, 2, -1} //リアナ
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);カリス…。pc
-
- %mandef(3)={$F , 0,$80, 4, 0} //伯爵
- &on
- &manmove 3,4,4,4,4
- %mandef(3)={$F , 0,$80, 4, -1} //伯爵
- &on
- !o(1)j(2)気品のある男j(0);(ん、w異国の者のようだな。;若いが、一
- !応あたってみるか。p;これで何人目だろうか…)pc
- %mandef(3)={$F , 0,$80, 4, 0} //伯爵
- &on
- &manmove 3,4,4,4,4,4,4
- %mandef(3)={$F , 0,$80, 4, -1} //伯爵
- &on
- !o(1)j(2)気品のある男j(0);図書館に入りたいのか。pc
- %mandef(1)={$9 , 0,$00, 2, 0} //カリス
- &on
- &manmove 1,-6
- %mandef(1)={$9 , 0,$00, 2, -1} //カリス
- %mandef(2)={$A , 0,$20, 2, 0} //リアナ
- &on
- &manmove 2,-6
- %mandef(2)={$A , 0,$20, 2, -1} //リアナ
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);!?pc
- !o(1)j(2)気品のある男j(0);違うのか。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);ええ、でも許可証が無くて。pc
- !o(1)j(2)気品のある男j(0);こっちへこい。pc
- %mandef(3)={$F , 0,$80, 4, 0} //伯爵
- &on
- &manmove 3,6,6,6,6,6,6,6,6,6,6
- %mandef(3)={$F , 0,$80, 4, -1} //伯爵
- &on
-
- %mandef(2)={$A , 0,$20, 2, 0} //リアナ
- &on
- &manmove 2,-2
- %mandef(2)={$A , 0,$20, 2, -1} //リアナ
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);カリス、どうする?pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);付いていこう。pc
- %mandef(1)={$9 , 0,$00, 2, 0} //カリス
- &on
- &contrast 0
- &manmove 1,6,6,6,6,6
- %mandef(1)={$9 , 0,$00, 2, -1} //カリス
- %manpoint(1)={100,100}
- %manpoint(2)={100,100}
- %manpoint(3)={100,100}
- %mandef(4)={$9 , 0,$08, 2, -1} //カリス
- %mandef(5)={$A , 0,$20, 6, -1} //リアナ
- %mandef(6)={$F , 0,$84, 2, -1} //伯爵
- %manpoint(4)={48,16}
- %manpoint(5)={40,14}
- %manpoint(6)={52,16}
- &on
- &move 63,6,-2
- %mandef(5)={$A , 0,$20, 6, 0} //リアナ
- &on
- &manmove 5,6,6,6,6,6,6
- %mandef(5)={$A , 0,$20, 6, -1} //リアナ
- &on
- !o(1)j(2)気品のある男j(0);一つ仕事を頼みたい。;報酬は私の持ってい
- !る図書館の入館許可証でどうだ。pc
- %mandef(4)={$9 , 0,$C2, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);入館許可証!pc
- !o(1)j(2)気品のある男j(0);受けてくれるか。pc
- %mandef(4)={$9 , 0,$08, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);仕事の内容は。pc
- !o(1)j(2)気品のある男j(0);一人の娘を牢獄より救い出してほしい。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);あなた、その人とは?pc
- %mandef(6)={$F , 0,$80, 2, -1} //伯爵
- &on
- !o(1)j(2)気品のある男j(0);私の娘だ。;お前たちがよそ者だから話すが
- !、娘は魔女の疑いを掛けられ投獄された。p;私のせいだ、私に
- !恨みのある者が密告したのだ。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);…お気の毒に。pc
- %mandef(6)={$F , 0,$84, 4, -1} //伯爵
- &on
- !o(1)j(2)気品のある男j(0);娘のいる場所やそこまでの進入経路の情報
- !、牢の鍵などは入手出来ている。p;あとは実行してくれる者を
- !探すのみだったのだ。p;頼む、引き受けてくれぬか。;入館許
- !可証の他に礼金も出そう。pc
- %mandef(4)={$9 , 0,$C3, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(オレみたいな若いのに、ここまで必死に頼むっ
- !てことは、だいぶ断られてきたな。p;それだけ厄介ということ
- !か。;でも…)p
- %mandef(4)={$9 , 0,$08, 2, -1} //カリス
- &on
- !o(1)j(2)カリスj(0);…わかった、引き受けよう。pc
- %mandef(6)={$F , 0,$81, 4, -1} //伯爵
- &on
- !o(1)j(2)気品のある男j(0);本当か!w;感謝いたす。;私はミリガルと申
- !す。p;さっそくだが、私の屋敷で詳しい打ち合わせをしよう。pc
- &contrast 0
- &wait 200
- &goto IV11
- }
-
-
- &if(進行==24){
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);wカリス、w東大陸へ行くの。pc
- %mandef(10)={$9 , 0,$00, 2, 0} //カリス
- &on
- &manmove 10,-8
- %mandef(10)={$9 , 0,$00, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、そのつもりだ。pc
- %mandef(11)={$A , 0,$20, 2, 0} //リアナ
- &on
- &manmove 11,2,2,2,2,2,2,-6
- %mandef(11)={$A , 0,$20, 2, -1} //リアナ
- %mandef(10)={$9 , 0,$00, 2, 0} //カリス
- &on
- &manmove 10,-4
- %mandef(10)={$9 , 0,$00, 2, -1} //カリス
- &on
- %manpoint(10)={100,100}
- %manpoint(11)={100,100}
- %mandef(12)={$9 , 0,$04, 2, -1} //カリス
- %manpoint(12)={18,14}
- %mandef(13)={$A , 0,$C4, 2, -1} //リアナ
- %manpoint(13)={15,14}
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);そうね、やっと目的地が決まったもんね。pc
- &wait 20
- %mandef(12)={$9 , 0,$A5, 2, -1} //カリス
- &on
- &wait 30
- %mandef(13)={$A , 0,$28, 2, -1} //リアナ
- &on
- &wait 80
- %mandef(12)={$9 , 0,$04, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…リアナ。ww;君はここから船でダリムラクスへ行
- !って、島に帰った方がいい。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);ど、
- %mandef(13)={$A , 0,$C5, 2, -1} //リアナ
- &on
- !wどうしてっ!pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);東大陸は蛮族たちが住む未開の地だ。;どんな危険
- !があるかわからない。;これ以上、君を巻き込めない。pc
- %mandef(13)={$A , 0,$C6, 2, -1} //リアナ
- &on
- &wait 20
- %mandef(13)={$A , 0,$C7, 2, -1} //リアナ
- &on
- &wait 20
- %mandef(13)={$A , 0,$C8, 2, -1} //リアナ
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);そんな心配いらない!w;あたしが望んでいること
- !だもん。pc
- %mandef(12)={$9 , 0,$A6, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…そう言われても、wこれ以上は迷惑なんだよ。pc
- &wait 10
- %mandef(12)={$9 , 0,$04, 2, -1} //カリス
- &on
- &wait 10
- %mandef(13)={$A , 0,$C9, 2, -1} //リアナ
- &on
- &wait 10
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);そんなっ!p;カリス、あたしのこと役に立ってる
- !って言ったよね。;護るって言ったよね。p;
- %mandef(13)={$A , 0,$CD, 2, -1} //リアナ
- &on
- !それなのに、そんな…。ww;
- %mandef(13)={$A , 0,$C6, 2, -1} //リアナ
- &on
- &wait 20
- %mandef(13)={$A , 0,$C7, 2, -1} //リアナ
- &on
- &wait 20
- %mandef(13)={$A , 0,$C8, 2, -1} //リアナ
- &on
- !自分の身ぐらい自分で護るわっ!;あなたの邪魔にはならないか
- !ら!pc
- %mandef(12)={$9 , 0,$A5, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);頼む。;大人しく言うことをきいてくれ。p;
- %mandef(13)={$A , 0,$28, 2, -1} //リアナ
- %mandef(12)={$9 , 0,$A7, 2, -1} //カリス
- &on
- !オレはもう自分のことしか見えちゃいない。;早く記憶を取り戻
- !したいんだ。p;君が近くにいると、島で感じた安らぎを思い出し
- !て、そのことを忘れてしまいそうになるんだ…。;
- %mandef(12)={$9 , 0,$A5, 2, -1} //カリス
- &on
- &wait 10
- %mandef(12)={$9 , 0,$A8, 2, -1} //カリス
- !頼む…。pc
- &on
- &wait 90
- %mandef(13)={$A , 0,$C9, 2, -1} //リアナ
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);wカリス…。
- %mandef(13)={$A , 0,$CA, 2, -1} //リアナ
- &on
- !www;
- !わかった…wあたし帰る。
- %mandef(12)={$9 , 0,$04, 2, -1} //カリス
- &on
- !ww;…カリスの邪魔はしたくないもん。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ごめん…。pc
- %mandef(13)={$A , 0,$28, 2, -1} //リアナ
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);んん、wいいの。p;でも、今日だけは一緒にいてい
- !いでしょ。;
- !…そうだ、wせっかくだからパパやママにお土産買
- !ってかなきゃ。p;
- %mandef(13)={$A , 0,$C4, 2, -1} //リアナ
- &on
- !ねえカリス、w一緒に選んでよ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…ああ、wいいよ。pc
- &wait 20
- %mandef(13)={$A , 0,$CC, 2, -1} //リアナ
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);やったぁ!ww;
- %mandef(13)={$A , 0,$E0, 2, -1} //リアナ
- &on
- &wait 15
- %mandef(13)={$A , 0,$E1, 2, -1} //リアナ
- &on
- &wait 15
- %mandef(13)={$A , 0,$28, 2, -1} //リアナ
- &on
- !じゃあ、早くいこっ。pc
- %mandef(13)={$A , 0,$E2, 2, -1} //リアナ
- &on
- &wait 15
- %mandef(13)={$A , 0,$E3, 2, -1} //リアナ
- &on
- &wait 15
- %mandef(13)={$A , 0,$E4, 2, -1} //リアナ
- &on
- &wait 15
- %mandef(13)={$A , 0,$E5, 2, -1} //リアナ
- &on
- &wait 15
- %mandef(13)={$A , 0,$E6, 2, -1} //リアナ
- &on
- &wait 30
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);…。pc
- &wait 30
- %mandef(12)={$9 , 0,$A8, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(…本当にすまない)pc
- &contrast 0
- &wait 200
- 町中=0
- &goto MATI4
- }
- //━━━━━━━━━━━━━━━━━━━━━━
- //━━━━━━━━━━━━━━━━━━━━━━
- [IV11]//伯爵屋敷
- &bgm 35
- &sppsp CHR\IV10.SPP
- &map MAP\IV11.MAP //マップの設定
- &mapsp MAP\IV11.SP //BGの設定
- &mappal MAP\IV11.PAL //BGパレットの設定
- %partypoint={15,17,2}
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1)={$1 , 1,$00, 2, -1} //扉
- %mandef(2)={$1 , 1,$04, 2, -1} //扉
- %mandef(3)={$1 , 1,$08, 2, -1} //扉
- %mandef(4)={$1 , 1,$0C, 2, -1} //扉
-
- &if(進行==21){
- %mandef(5)={$9 , 0,$A9, 2, -1} //カリス
- %mandef(6)={$A , 0,$E7, 2, -1} //リアナ
- %mandef(7)={$F , 0,$8C, 2, -1} //ミリガル
- }
- &if(進行==22){
- %mandef(6)={$A , 0,$EB, 2, -1} //リアナ
- %mandef(7)={$F , 0,$8D, 2, -1} //ミリガル
- }
- &if(進行==25){
- %mandef(5)={$9 , 0,$6B, 2, -1} //カリス
- %manpoint(5)={24,14}
- %mandef(6)={$B , 0,$60, 2, -1} //ルシェル
- %manpoint(6)={21,12}
- }
-
- &on
-
- &if(進行==21){
- !o(1)j(2)ミリガルj(0);それでは頼むぞ。;救出後は港に向かい、娘を用
- !意してある船に乗せてやってくれ。p;失敗は許されんぞ。p
- !o(1)j(2)ミリガルj(0);(しかし、この若者がどれほどの者か。w;失敗
- !した時の事も考えておかねば)pc
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);わかりました。;ですが、御令嬢を救出することに
- !よって、伯爵にその矛先が向くことになるのでは。pc
- %mandef(6)={$A , 0,$E8, 2, -1} //リアナ
- &on
- &monsprint 160,32,リアナ1
- !o(1)j(2)リアナj(0);(へえ、カリスってこんな話し方も出来るんだ)pc
- !o(1)j(2)ミリガルj(0);心配はいらん。;その点は内部協力者がうまくや
- !ってくれる。pc
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);そうですか。p
- !o(1)j(2)カリスj(0);(身替わりかでもたてるのか…)pc
- !o(1)j(2)ミリガルj(0);それでは、しかと頼むぞ。pc
- %mandef(6)={$A , 0,$E7, 2, -1} //リアナ
- &on
- &monsprint 160,32,リアナ1
- !o(1)j(2)リアナj(0);まかせといて、お嬢さんを必ず助けてあげる。pc
- %mandef(5)={$9 , 0,$AA, 2, -1} //カリス
- &on
- &wait 25
- %mandef(5)={$9 , 0,$AB, 2, -1} //カリス
- &on
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);リアナ。;君はここで待っていてくれ。pc
- %mandef(6)={$A , 0,$E9, 2, -1} //リアナ
- &on
- &monsprint 160,32,リアナ1
- !o(1)j(2)リアナj(0);えっ、どうしてよ。pc
- %mandef(5)={$9 , 0,$AC, 2, -1} //カリス
- &on
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);この仕事は危険だ。p;いくら情報があっても、厳
- !重な警戒の中に飛び込んで行くんだ。;ただじゃ済まない。p;
- !それに救出後のことを考えると2人も面倒は見切れない。pc
- %mandef(5)={$9 , 0,$AB, 2, -1} //カリス
- &on
- &monsprint 160,32,リアナ1
- !o(1)j(2)リアナj(0);やっぱり、あたしは足手間といだって言うの!pc
- %mandef(6)={$A , 0,$EA, 2, -1} //リアナ
- &on
- %mandef(5)={$9 , 0,$AC, 2, -1} //カリス
- &on
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);そうじゃないけど。w;元々はオレの問題なんだ。;
- !むやみにリアナを危険に巻き込むわけにはいかない。p;お願い
- !だ。;ここで待っていてくれ。pc
- %mandef(5)={$9 , 0,$AB, 2, -1} //カリス
- &on
- &monsprint 160,32,リアナ1
- !o(1)j(2)リアナj(0);でも。pc
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);…。pc
- %mandef(6)={$A , 0,$EB, 2, -1} //リアナ
- &on
- &monsprint 160,32,リアナ1
- !o(1)j(2)リアナj(0);…わ、wわかったわ。p
- !o(1)j(2)リアナj(0);(あたし、あなたの役に立ちたくて付いてきたの
- !に)pc
- %mandef(5)={$9 , 0,$A9, 2, -1} //カリス
- &on
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);伯爵。;リアナをお願いしてもよろしいでしょう
- !か。pc
- !o(1)j(2)ミリガルj(0);もちろんかまわんよ。pc
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);ありがとうございます。pc
- &partyout 2
- &complete
- &goto IV12
- }
-
- &if(進行==22){
- %mandef(1)={$1 , 1,$01, 2, -1} //扉
- %mandef(2)={$1 , 1,$05, 2, -1} //扉
- %mandef(3)={$1 , 1,$09, 2, -1} //扉
- %mandef(4)={$1 , 1,$0D, 2, -1} //扉
- &wait 20
- &on
- %mandef(1)={$1 , 1,$02, 2, -1} //扉
- %mandef(2)={$1 , 1,$06, 2, -1} //扉
- %mandef(3)={$1 , 1,$0A, 2, -1} //扉
- %mandef(4)={$1 , 1,$0E, 2, -1} //扉
- %mandef(5)={$9 , 0,$00, 2, -1} //カリス
- %manpoint(5)={23,5}
- &wait 20
- &on
- %mandef(1)={$1 , 1,$03, 2, -1} //扉
- %mandef(2)={$1 , 1,$07, 2, -1} //扉
- %mandef(3)={$1 , 1,$0B, 2, -1} //扉
- %mandef(4)={$1 , 1,$0F, 2, -1} //扉
- %mandef(5)={$9 , 0,$00, 2, 0} //カリス
- &wait 20
- &on
-
- &manmove 5,2,2,2,2,2
- %mandef(5)={$9 , 0,$00, 2, -1} //カリス
- &on
-
- %mandef(6)={$A , 0,$EC, 2, -1} //リアナ
- &on
- &wait 25
- %mandef(6)={$A , 0,$ED, 2, -1} //リアナ
- &on
- &wait 25
- %mandef(6)={$A , 0,$EE, 2, -1} //リアナ
- &on
- &monsprint 160,32,リアナ1
- !o(1)j(2)リアナj(0);カリスっ!pc
- !o(1)j(2)ミリガルj(0);すでに報告は入っておる。;よくやってくれた。
- !pc
- %mandef(5)={$9 , 0,$00, 2, 0} //カリス
- &on
- &manmove 5,4,4,4,4,4,4,4,4
- %mandef(6)={$A , 0,$EF, 2, -1} //リアナ
- %mandef(7)={$F , 0,$8C, 2, -1} //ミリガル
- &on
- &manmove 5,4,4,4,4,4,4,4,2,2,2,2
- %mandef(5)={$9 , 0,$00, 2, -1} //カリス
- &on
- &wait 25
- %mandef(6)={$A , 0,$E7, 2, -1} //リアナ
- %mandef(7)={$F , 0,$8E, 2, -1} //ミリガル
- &on
-
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);これをマリーヌ様よりお預かりしました。ww;伯爵の
- !ことを愛していると。pc
- %mandef(5)={$9 , 0,$00, 2, 0} //カリス
- &on
- &manmove 5,2
- %mandef(5)={$9 , 0,$00, 2, -1} //カリス
- &on
- %mandef(7)={$F , 0,$8F, 2, -1} //ミリガル
- &on
- &wait 50
- %mandef(5)={$9 , 0,$00, 2, 0} //カリス
- %mandef(7)={$F , 0,$8E, 2, -1} //ミリガル
- &on
- &manmove 5,8,-2
- %mandef(5)={$9 , 0,$00, 2, -1} //カリス
- &on
- !o(1)j(2)ミリガルj(0);妻の形見の指輪。w;…そうか。w;…マリーヌ。p;
- !…さあ、w報酬の図書館の入館許可証と礼金だ。;受け取ってくれ。pc
- %mandef(5)={$9 , 0,$00, 2, 0} //カリス
- &on
- &manmove 5,2
- %mandef(5)={$9 , 0,$00, 2, -1} //カリス
- %mandef(7)={$F , 0,$8F, 2, -1} //ミリガル
- &on
- %gold=%gold+3000
- &if(%gold<0){%gold=32760}
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);はい、確かに。pc
- %mandef(5)={$9 , 0,$00, 2, 0} //カリス
- %mandef(7)={$F , 0,$8E, 2, -1} //ミリガル
- &on
- &manmove 5,8,-2
- %mandef(5)={$9 , 0,$00, 2, -1} //カリス
- &on
- !o(1)j(2)ミリガルj(0);今日はここに泊まって行くと良い。p;目覚めた
- !ら、図書館で用事を済ませ、直ぐにこの都市を出ることだ。pc
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);わかりました。;ありがとうございます。pc
- %mandef(6)={$A , 0,$E8, 2, -1} //リアナ
- &on
- &monsprint 160,32,リアナ1
- !o(1)j(2)リアナj(0);wカリス、ほんと無事で良かった。pc
- %mandef(5)={$9 , 0,$00, 2, 0} //カリス
- &on
- &manmove 5,-6
- %mandef(5)={$9 , 0,$00, 2, -1} //カリス
- &on
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);ああ。pc
- &contrast 0
- &wait 200
- &partyin 2
- 町中=0
- &complete
- &goto MATI4
- }
-
- &if(進行==25){
- %mandef(6)={$B , 0,$61, 2, -1} //ルシェル
- &wait 30
- &on
- %mandef(6)={$B , 0,$60, 2, -1} //ルシェル
- &wait 30
- &on
- %mandef(6)={$B , 0,$62, 2, -1} //ルシェル
- &wait 30
- &on
- %mandef(6)={$B , 0,$60, 2, -1} //ルシェル
- &wait 30
- &on
- %mandef(6)={$B , 0,$61, 2, -1} //ルシェル
- &wait 30
- &on
- %mandef(6)={$B , 0,$60, 2, -1} //ルシェル
- &wait 30
- &on
- %mandef(6)={$B , 0,$64, 2, -1} //ルシェル
- &wait 30
- &on
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);あの、wここは?pc
- %mandef(5)={$9 , 0,$6C, 2, -1} //カリス
- &on
- %mandef(5)={$9 , 0,$6D, 2, -1} //カリス
- &wait 15
- &on
- %mandef(5)={$9 , 0,$6E, 2, -1} //カリス
- &wait 15
- &on
- %mandef(5)={$9 , 0,$6F, 2, -1} //カリス
- &wait 15
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ミリガル伯爵の屋敷だ。pc
- %mandef(6)={$B , 0,$63, 2, -1} //ルシェル
- &on
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);ミリガル伯爵って!w;お知り合いなのですか?pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、wちょっとな。;ひとまずここでかくまって
- !もらおう。pc
- %mandef(6)={$B , 0,$64, 2, -1} //ルシェル
- %mandef(1)={$1 , 1,$01, 2, -1} //扉
- %mandef(2)={$1 , 1,$05, 2, -1} //扉
- %mandef(3)={$1 , 1,$09, 2, -1} //扉
- %mandef(4)={$1 , 1,$0D, 2, -1} //扉
- &wait 20
- &on
- %mandef(1)={$1 , 1,$02, 2, -1} //扉
- %mandef(2)={$1 , 1,$06, 2, -1} //扉
- %mandef(3)={$1 , 1,$0A, 2, -1} //扉
- %mandef(4)={$1 , 1,$0E, 2, -1} //扉
- %mandef(7)={$F , 0,$40, 2, -1} //ミリガル
- %manpoint(7)={23,5}
- &wait 20
- &on
- %mandef(1)={$1 , 1,$03, 2, -1} //扉
- %mandef(2)={$1 , 1,$07, 2, -1} //扉
- %mandef(3)={$1 , 1,$0B, 2, -1} //扉
- %mandef(4)={$1 , 1,$0F, 2, -1} //扉
- %mandef(7)={$F , 0,$40, 2, 0} //ミリガル
- %mandef(5)={$9 , 0,$0C, 2, -1} //カリス
- &wait 20
- &on
-
- &manmove 7,2,2,2,2,2
- %mandef(7)={$F , 0,$40, 2, -1} //ミリガル
- %mandef(6)={$B , 0,$65, 2, -1} //ルシェル
- &on
- %mandef(6)={$B , 0,$66, 2, -1} //ルシェル
- &wait 20
- &on
-
- !o(1)j(2)ミリガルj(0);そなたか。;ん、wどうしたのだ?;あの元気なお
- !嬢さんは?pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);実は…。pc
- &contrast 0
- &wait 200
- &contrast 15
- &wait 100
- !o(1)j(2)ミリガルj(0);なんと!w;わかった。;広場に様子を見に行か
- !せよう。pc
- &contrast 0
- &wait 500
- %mandef(1)={$1 , 1,$00, 2, -1} //扉
- %mandef(2)={$1 , 1,$04, 2, -1} //扉
- %mandef(3)={$1 , 1,$08, 2, -1} //扉
- %mandef(4)={$1 , 1,$0C, 2, -1} //扉
- %mandef(5)={$9 , 0,$6B, 2, -1} //カリス
- %manpoint(5)={11,13}
- %mandef(6)={$B , 0,$60, 2, -1} //ルシェル
- %manpoint(6)={15,13}
- %mandef(7)={$F , 0,$8D, 2, -1} //ミリガル
- %manpoint(7)={8,17}
- &on
- &contrast 15
- &wait 100
- %mandef(1)={$1 , 1,$01, 2, -1} //扉
- %mandef(2)={$1 , 1,$05, 2, -1} //扉
- %mandef(3)={$1 , 1,$09, 2, -1} //扉
- %mandef(4)={$1 , 1,$0D, 2, -1} //扉
- &wait 20
- &on
- %mandef(1)={$1 , 1,$02, 2, -1} //扉
- %mandef(2)={$1 , 1,$06, 2, -1} //扉
- %mandef(3)={$1 , 1,$0A, 2, -1} //扉
- %mandef(4)={$1 , 1,$0E, 2, -1} //扉
- %mandef(8)={$A , 1,$20, 2, -1} //執事
- %manpoint(8)={23,5}
- &wait 20
- &on
- %mandef(1)={$1 , 1,$03, 2, -1} //扉
- %mandef(2)={$1 , 1,$07, 2, -1} //扉
- %mandef(3)={$1 , 1,$0B, 2, -1} //扉
- %mandef(4)={$1 , 1,$0F, 2, -1} //扉
- !o(1)j(2)執事j(0);失礼致します。pc
- %mandef(8)={$A , 1,$20, 2, 0} //執事
- %mandef(6)={$B , 0,$64, 2, -1} //ルシェル
- &on
- &manmove 8,2,2,2,2,2,4,4,4,4,4,4,4,4
- %mandef(7)={$F , 0,$8C, 2, -1} //ミリガル
- %mandef(6)={$B , 0,$60, 2, -1} //ルシェル
- &on
- &manmove 8,4,4,4,4,4,4,4,2,2,2,2
- %mandef(8)={$A , 1,$20, 2, -1} //執事
- %mandef(6)={$B , 0,$61, 2, -1} //ルシェル
- &on
- &wait 25
- %mandef(7)={$F , 0,$8E, 2, -1} //ミリガル
- &on
-
- !o(1)j(2)執事j(0);旦那様、こちらを。pc
- %mandef(8)={$A , 1,$20, 2, 0} //執事
- &on
- &manmove 8,2
- %mandef(8)={$A , 1,$20, 2, -1} //執事
- &on
- %mandef(7)={$F , 0,$8F, 2, -1} //ミリガル
- &on
- !o(1)j(2)ミリガルj(0);うむ。pc
- &wait 50
- %mandef(8)={$A , 1,$20, 2, 0} //執事
- %mandef(7)={$F , 0,$8E, 2, -1} //ミリガル
- &on
- &manmove 8,8,-2
- %mandef(8)={$A , 1,$20, 2, -1} //執事
- &on
- &wait 20
- %mandef(8)={$A , 1,$20, 2, 0} //執事
- &on
- &manmove 8,8,8,8,8,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,8,8,8,8,8,-2
- %mandef(8)={$A , 1,$20, 2, -1} //執事
- &on
- %mandef(1)={$1 , 1,$02, 2, -1} //扉
- %mandef(2)={$1 , 1,$06, 2, -1} //扉
- %mandef(3)={$1 , 1,$0A, 2, -1} //扉
- %mandef(4)={$1 , 1,$0E, 2, -1} //扉
- &wait 20
- &on
- %mandef(1)={$1 , 1,$01, 2, -1} //扉
- %mandef(2)={$1 , 1,$05, 2, -1} //扉
- %mandef(3)={$1 , 1,$09, 2, -1} //扉
- %mandef(4)={$1 , 1,$0D, 2, -1} //扉
- %manpoint(8)={100,100}
- &wait 20
- &on
- %mandef(1)={$1 , 1,$00, 2, -1} //扉
- %mandef(2)={$1 , 1,$04, 2, -1} //扉
- %mandef(3)={$1 , 1,$08, 2, -1} //扉
- %mandef(4)={$1 , 1,$0C, 2, -1} //扉
- &wait 20
- &on
-
- %mandef(7)={$F , 0,$8C, 2, -1} //ミリガル
- &on
- !o(1)j(2)ミリガルj(0);今、使いの者が戻った。pc
- %mandef(5)={$9 , 0,$A2, 2, -1} //カリス
- &on
- &wait 15
- %mandef(5)={$9 , 0,$AE, 2, -1} //カリス
- &on
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);それで、リアナはっ!pc
- !o(1)j(2)ミリガルj(0);残念だが異端審問官に捕まった。w;すでに、明
- !後日に処刑というふれが回っていたそうだ。pc
- %mandef(5)={$9 , 0,$AF, 2, -1} //カリス
- %mandef(6)={$B , 0,$67, 2, -1} //ルシェル
- &on
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);ふぅっw・w・w・!ww;くっ!pc
- %mandef(6)={$B , 0,$68, 2, -1} //ルシェル
- &on
- &monsprint 160,32,ルシェル
- !o(1)j(2)ルシェルj(0);私のために、wすいません…。pc
- %mandef(5)={$9 , 0,$AE, 2, -1} //カリス
- &on
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);伯爵、お願いですっ!w;協力して頂けませんかっ
- !!pc
- !o(1)j(2)ミリガルj(0);…わかっておる。w;そなたには大きな恩があ
- !るからな。;至急、手を打とう。pc
- &contrast 0
- &wait 200
- %mandef(5)={$9 , 0,$6B, 2, -1} //カリス
- %mandef(6)={$B , 0,$60, 2, -1} //ルシェル
- %manpoint(7)={100,100}
- &on
- &contrast 15
- &wait 100
-
- %mandef(1)={$1 , 1,$01, 2, -1} //扉
- %mandef(2)={$1 , 1,$05, 2, -1} //扉
- %mandef(3)={$1 , 1,$09, 2, -1} //扉
- %mandef(4)={$1 , 1,$0D, 2, -1} //扉
- &wait 20
- &on
- %mandef(1)={$1 , 1,$02, 2, -1} //扉
- %mandef(2)={$1 , 1,$06, 2, -1} //扉
- %mandef(3)={$1 , 1,$0A, 2, -1} //扉
- %mandef(4)={$1 , 1,$0E, 2, -1} //扉
- %mandef(7)={$F , 0,$40, 2, -1} //ミリガル
- %manpoint(7)={23,5}
- &wait 20
- &on
- %mandef(1)={$1 , 1,$03, 2, -1} //扉
- %mandef(2)={$1 , 1,$07, 2, -1} //扉
- %mandef(3)={$1 , 1,$0B, 2, -1} //扉
- %mandef(4)={$1 , 1,$0F, 2, -1} //扉
- %mandef(7)={$F , 0,$40, 2, 0} //ミリガル
- %mandef(6)={$B , 0,$64, 2, -1} //ルシェル
- &on
- &manmove 7,2,2,2,2,-8
- %mandef(7)={$F , 0,$40, 2, -1} //ミリガル
- &on
- %mandef(1)={$1 , 1,$02, 2, -1} //扉
- %mandef(2)={$1 , 1,$06, 2, -1} //扉
- %mandef(3)={$1 , 1,$0A, 2, -1} //扉
- %mandef(4)={$1 , 1,$0E, 2, -1} //扉
- &wait 20
- &on
- %mandef(1)={$1 , 1,$01, 2, -1} //扉
- %mandef(2)={$1 , 1,$05, 2, -1} //扉
- %mandef(3)={$1 , 1,$09, 2, -1} //扉
- %mandef(4)={$1 , 1,$0D, 2, -1} //扉
- &wait 20
- &on
- %mandef(1)={$1 , 1,$00, 2, -1} //扉
- %mandef(2)={$1 , 1,$04, 2, -1} //扉
- %mandef(3)={$1 , 1,$08, 2, -1} //扉
- %mandef(4)={$1 , 1,$0C, 2, -1} //扉
- &wait 20
- %mandef(7)={$F , 0,$40, 2, 0} //ミリガル
- &on
- &manmove 7,2,4,4,4,4,4,4,4,4
- %mandef(6)={$B , 0,$60, 2, -1} //ルシェル
- &on
- &manmove 7,4,4,4,4,4,4,4,2,2,2,2,2,2
- %mandef(6)={$B , 0,$61, 2, -1} //ルシェル
- %mandef(7)={$F , 0,$8E, 2, -1} //ミリガル
- &on
- &manmove 7,2
- %mandef(7)={$F , 0,$8C, 2, -1} //ミリガル
- &on
- &wait 50
- %mandef(5)={$9 , 0,$AE, 2, -1} //カリス
- &on
- &wait 15
- %mandef(5)={$9 , 0,$CE, 2, -1} //カリス
- &on
- !o(1)j(2)ミリガルj(0);カリス。w;リアナの捕まっている場所がわかっ
- !た。p;娘のマリーヌが捕まっていた牢獄だ。pc
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);っ!pc
- !o(1)j(2)ミリガルj(0);あれ以来、あそこの警備はさらに厳重になって
- !いる。p;救出に行くのは不可能に近いぞ。pc
- %mandef(5)={$9 , 0,$AE, 2, -1} //カリス
- &on
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);でも、w行きます。pc
- %mandef(5)={$9 , 0,$CE, 2, -1} //カリス
- &on
- &wait 80
- !o(1)j(2)ミリガルj(0);wわかった。;いいか、リアナはどうやら特別な
- !場所に監禁されているようだ。p;まず、看守のトニオという男
- !に会うんだ。;彼が協力してくれる。pc
- %mandef(5)={$9 , 0,$AF, 2, -1} //カリス
- &on
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);感謝致します、伯爵。pc
- !o(1)j(2)ミリガルj(0);ああ、成功を祈っているぞ。p;
- %mandef(5)={$9 , 0,$CE, 2, -1} //カリス
- &on
- !早速、今夜だな。;トニオに使いを送っておこう。pc
- &contrast 0
- &wait 200
- &complete
- &goto IV12
- }
-
- //━━━━━━━━━━━━━━━━━━━━━━
- //━━━━━━━━━━━━━━━━━━━━━━
- [IV12]//牢獄潜入
- &bgm 19
- &sppsp CHR\IV10.SPP
- &map MAP\IV12.MAP //マップの設定
- &mapsp MAP\IV12.SP //BGの設定
- &mappal MAP\IV12.PAL //BGパレットの設定
- %partypoint={0,32,2}
- &partyspeed 1
-
-
- &if(進行==21){
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1)={$9 , 1,$40, 2, -1} //カリス
- &on
-
- %mandef(1)={$9 , 1,$41, 2, -1} //カリス
- &on
- &wait 30
- %mandef(1)={$9 , 1,$40, 2, -1} //カリス
- &on
- &wait 30
- %mandef(1)={$9 , 1,$42, 2, -1} //カリス
- &on
- &wait 30
- %mandef(1)={$9 , 1,$40, 2, -1} //カリス
- &on
- &wait 30
- %mandef(1)={$9 , 1,$41, 2, -1} //カリス
- &on
- &wait 30
- %mandef(1)={$9 , 1,$40, 2, -1} //カリス
- &on
- &wait 30
- %mandef(1)={$9 , 1,$42, 2, -1} //カリス
- &on
- &wait 30
- %mandef(1)={$9 , 1,$40, 2, -1} //カリス
- &on
- &wait 100
- %mandef(1)={$9 , 1,$43, 2, -1} //カリス
- &on
- &wait 20
- %mandef(1)={$9 , 1,$44, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(ちっ、月が明るすぎるな)pc
- &wait 30
- %mandef(1)={$9 , 1,$45, 2, -1} //カリス
- &on
- &wait 20
- %mandef(1)={$9 , 1,$40, 2, -1} //カリス
- &on
- &wait 100
- %mandef(1)={$9 , 1,$46, 2, -1} //カリス
- &on
- &wait 20
- %mandef(1)={$9 , 1,$47, 2, -1} //カリス
- &on
- &wait 10
- %mandef(1)={$9 , 1,$60, 2, 1} //カリス
- &on
- &manmove 1,2,2,2,2,2,2,2,2,2,2,2
- %mandef(1)={$9 , 1,$48, 2, -1} //カリス
- &on
- &wait 10
- &pcm 19
- %mandef(1)={$9 , 1,$46, 2, -1} //カリス
- &on
- &wait 20
- %mandef(1)={$9 , 1,$40, 2, -1} //カリス
- &on
- &wait 20
- %mandef(1)={$9 , 1,$49, 2, -1} //カリス
- &on
- &wait 20
- %mandef(1)={$9 , 1,$4A, 2, -1} //カリス
- &on
- &wait 80
- &partymove 8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8
- &goto2 DUN2,96,34,2
- }
-
- &if(進行==25){
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1)={$9 , 1,$40, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(リアナ、今助けに行くぞ)pc
- %mandef(1)={$9 , 1,$46, 2, -1} //カリス
- &on
- &wait 20
- %mandef(1)={$9 , 1,$47, 2, -1} //カリス
- &on
- &wait 10
- %mandef(1)={$9 , 1,$60, 2, 1} //カリス
- &on
- &manmove 1,2,2,2,2,2,2,2,2,2,2,2
- %mandef(1)={$9 , 1,$48, 2, -1} //カリス
- &on
- &wait 10
- &pcm 19
- %mandef(1)={$9 , 1,$46, 2, -1} //カリス
- &on
- &wait 20
- %mandef(1)={$9 , 1,$40, 2, -1} //カリス
- &on
- &wait 20
- %mandef(1)={$9 , 1,$49, 2, -1} //カリス
- &on
- &wait 20
- %mandef(1)={$9 , 1,$4A, 2, -1} //カリス
- &on
- &wait 50
-
- %mandef(2)={$B , 1,$65, 2, -1} //ルシェル
- %manpoint(2)={14,26}
- &on
- &wait 20
- %mandef(2)={$B , 1,$66, 2, -1} //ルシェル
- &on
- &wait 20
- %mandef(2)={$B , 1,$67, 2, -1} //ルシェル
- &on
- &wait 20
- %mandef(2)={$B , 1,$68, 2, -1} //ルシェル
- &on
- &wait 20
- %mandef(2)={$B , 1,$67, 2, -1} //ルシェル
- &on
- &wait 20
- %mandef(2)={$B , 1,$68, 2, -1} //ルシェル
- &on
- &wait 20
- %mandef(2)={$B , 1,$69, 2, -1} //ルシェル
- &on
- &wait 20
- %mandef(2)={$B , 1,$6A, 2, -1} //ルシェル
- &on
- &wait 20
- %mandef(2)={$B , 1,$6B, 2, -1} //ルシェル
- &on
- &wait 20
- %mandef(2)={$B , 1,$6C, 2, -1} //ルシェル
- &on
- &wait 20
- %mandef(2)={$B , 1,$6D, 2, -1} //ルシェル
- &on
- &manmove 2,2
- %mandef(2)={$B , 1,$6E, 2, -1} //ルシェル
- &on
- &wait 20
- %mandef(2)={$B , 1,$6F, 2, -1} //ルシェル
- &on
- &wait 50
- %mandef(2)={$B , 1,$84, 2, -1} //ルシェル
- &on
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);カリスさん、どいて下さい。pc
- %mandef(1)={$9 , 1,$4B, 2, -1} //カリス
- &on
- &wait 20
- %mandef(1)={$9 , 1,$4C, 2, -1} //カリス
- &on
- &wait 20
- %mandef(1)={$9 , 1,$4D, 2, -1} //カリス
- &on
- &wait 30
- %mandef(1)={$9 , 1,$4E, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);なっ!w;ルシェル!w;なぜ君がここにいるんだっ
- !!pc
- &wait 20
- %mandef(2)={$B , 1,$85, 2, -1} //ルシェル
- &on
- &wait 20
- %mandef(2)={$B , 1,$86, 2, -1} //ルシェル
- &on
- &manmove 2,6
- &wait 20
- %mandef(2)={$B , 1,$85, 2, -1} //ルシェル
- &on
- &wait 20
- %mandef(2)={$B , 1,$86, 2, -1} //ルシェル
- &on
- &manmove 2,6
- &wait 20
- %mandef(2)={$B , 1,$85, 2, -1} //ルシェル
- &on
- &wait 50
- &wait 20
- %mandef(2)={$B , 1,$86, 2, -1} //ルシェル
- &on
- &wait 20
- %mandef(2)={$B , 1,$87, 2, -1} //ルシェル
- &on
- &wait 20
- %mandef(2)={$B , 1,$88, 2, -1} //ルシェル
- &on
- &wait 20
- %mandef(2)={$B , 1,$89, 2, -1} //ルシェル
- &on
- &wait 10
- %mandef(2)={$B , 1,$80, 2, 1} //ルシェル
- &on
- &manmove 2,2,2,2,2,2,2,2,2,2,2,2
- %mandef(2)={$B , 1,$8A, 2, -1} //ルシェル
- &on
- &wait 10
- &pcm 19
- %mandef(2)={$B , 1,$88, 2, -1} //ルシェル
- &on
- &wait 20
- %mandef(2)={$B , 1,$87, 2, -1} //ルシェル
- &on
- &wait 20
- %mandef(2)={$B , 1,$8B, 2, -1} //ルシェル
- &on
- &wait 20
- %mandef(2)={$B , 1,$8C, 2, -1} //ルシェル
- &on
- &wait 20
- %mandef(2)={$B , 1,$8D, 2, -1} //ルシェル
- &on
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);私もリアナさんを助けに行きます。;もとはと言
- !えば私のせいですもの。pc
- %mandef(1)={$9 , 1,$4F, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);何を言ってるんだ!;悪いが足手間といだ、さっさ
- !と戻れ!pc
- %mandef(2)={$B , 1,$8E, 2, -1} //ルシェル
- &on
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);おねがいです。;付いていかせて下さい。pc
-
- !o(1)j(2)衛兵j(0);おい。w;向こうの方から何か聞こえなかったか。pc
- !o(1)j(2)衛兵j(0);ん、wそうか。w;オレには聞こえなかったが。;まあ、
- !一応調べてみよう。pc
- %mandef(1)={$9 , 1,$64, 2, -1} //カリス
- &on
- &wait 50
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ちっ、w仕方ない。w;
- %mandef(1)={$9 , 1,$4F, 2, -1} //カリス
- &on
- !だけど、君がまた捕まって
- !も助けやしないからな。pc
- %mandef(2)={$B , 1,$8F, 2, -1} //ルシェル
- &on
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);はい、wありがとうございます。pc
- &partyset 1,4
- &goto2 DUN2,96,34,2
- }
-
-
- //━━━━━━━━━━━━━━━━━━━━━━
- //━━━━━━━━━━━━━━━━━━━━━━
- [IV13]//港
- &bgm 31
- &partyset 1
- &sppsp CHR\IV10.SPP
- &map MAP\IV13.MAP //マップの設定
- &mapsp MAP\IV13.SP //BGの設定
- &mappal MAP\IV13.PAL //BGパレットの設定
- %partypoint={0,0,2}
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1)={$9 , 0,$00, 6, 0} //カリス
- %mandef(2)={$F , 1,$A0, 6, -1} //マリーヌ
- %mandef(3)={$B , 1,$C4, 2, -1} //ハリソン
-
- &on
- &manmove 1,-4
- %mandef(1)={$9 , 0,$00, 6, -1} //カリス
- &on
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);マリーヌ様、そこでお待ち下さい。pc
- %mandef(1)={$9 , 0,$00, 6, 0} //カリス
- &on
- &manmove 1,6,6,6,6,6,6,6,6,6,6
- %mandef(1)={$9 , 0,$00, 6, -1} //カリス
- &on
- !o(1)j(2)フードの男j(0);うまくいったようだな。pc
- %mandef(1)={$9 , 0,$00, 6, 0} //カリス
- &on
- &manmove 1,6
- %mandef(1)={$9 , 0,$00, 6, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ミリガル伯の者か。pc
- !o(1)j(2)フードの男j(0);ああ。pc
- %mandef(3)={$B , 1,$C8, 2, -1} //ハリソン
- &on
- &wait 20
- %mandef(3)={$B , 1,$C9, 2, -1} //ハリソン
- &on
- &wait 20
- %mandef(3)={$B , 1,$CA, 2, -1} //ハリソン
- &on
- &wait 20
- %mandef(3)={$B , 1,$CB, 2, -1} //ハリソン
- &on
- &wait 20
- %mandef(3)={$B , 1,$CC, 2, -1} //ハリソン
- &on
- &wait 80
- !o(1)j(2)マリーヌj(0);ハリソン!pc
- %mandef(1)={$9 , 0,$00, 6, 0} //カリス
- &on
- &manmove 1,-4
- %mandef(1)={$9 , 0,$00, 6, -1} //カリス
- %mandef(2)={$F , 1,$A0, 6, 1} //マリーヌ
- &on
- &manmove 2,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6
- %mandef(2)={$F , 1,$A0, 6, -1} //マリーヌ
- %mandef(1)={$9 , 0,$00, 6, 0} //カリス
- &on
- &manmove 1,-6
- %mandef(1)={$9 , 0,$00, 6, -1} //カリス
- %mandef(3)={$B , 1,$CD, 2, -1} //ハリソン
- &on
- !o(1)j(2)ハリソンj(0);おお、マリーヌ様、御無事でなによりです。p;牢獄はお辛
- !かったでしょう。;もう安心ですぞ。p;これから、爺と一緒にダリムラ
- !クスの叔母上の元へ向かいますぞ。pc
- !o(1)j(2)マリーヌj(0);父上は!?pc
- %mandef(3)={$B , 1,$CC, 2, -1} //ハリソン
- &on
- !o(1)j(2)ハリソンj(0);伯爵様は大丈夫です。;事が落ち着き次第、会いに来てく
- !ださいまする。p;さ、お急ぎくだされ。pc
- &wait 100
- %mandef(2)={$F , 1,$A0, 6, 0} //マリーヌ
- &on
- &manmove 2,4,4,-2
- %mandef(2)={$F , 1,$A0, 6, -1} //マリーヌ
- %mandef(1)={$9 , 0,$00, 6, 0} //カリス
- &on
- &manmove 1,-8
- %mandef(1)={$9 , 0,$00, 6, -1} //カリス
- &on
- !o(1)j(2)マリーヌj(0);カリス殿、お願いがございます。p;これを父上にお渡し
- !ください。;マリーヌは父上を愛しておりますと。pc
- %mandef(2)={$F , 1,$A0, 6, 0} //マリーヌ
- &on
- &manmove 2,2
- %mandef(2)={$F , 1,$A0, 6, -1} //マリーヌ
- &on
- &wait 50
- %mandef(2)={$F , 1,$A0, 6, 0} //マリーヌ
- &on
- &manmove 2,8,-2
- %mandef(2)={$F , 1,$A0, 6, -1} //マリーヌ
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);確かに、お預かり致しました。pc
- !o(1)j(2)ハリソンj(0);マリーヌ様、参りましょう。pc
- %mandef(2)={$F , 1,$A0, 6, 0} //マリーヌ
- &on
- &manmove 2,-6
- %mandef(2)={$F , 1,$A0, 6, -1} //マリーヌ
- &on
- &wait 50
- %mandef(2)={$F , 1,$A0, 6, 0} //マリーヌ
- &on
- &manmove 2,-2
- %mandef(2)={$F , 1,$A0, 6, -1} //マリーヌ
- &on
- &wait 50
- !o(1)j(2)マリーヌj(0);カリス殿、助けていただき本当にありがとうございまし
- !た。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);いいえ、ご無事で何よりでした。pc
- &wait 60
- %mandef(2)={$F , 1,$A0, 6, 0} //マリーヌ
- &on
- &manmove 2,6,6
- %mandef(2)={$F , 1,$A0, 6, -1} //マリーヌ
- %mandef(1)={$9 , 0,$00, 6, 0} //カリス
- &on
- &manmove 1,-6
- %mandef(1)={$9 , 0,$00, 6, -1} //カリス
- &on
- &contrast 0
- &wait 200
- &goto IV11
-
- //━━━━━━━━━━━━━━━━━━━━━━
- //━━━━━━━━━━━━━━━━━━━━━━
- [IV14]//図書館
- &bgm 33
- &sppsp CHR\IV14.SPP
- &map MAP\IV14.MAP //マップの設定
- &mapsp MAP\IV14.SP //BGの設定
- &mappal MAP\IV14.PAL //BGパレットの設定
- %partypoint={0,0,2}
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1)={$9 , 0,$00, 8, -1} //カリス
- %mandef(2)={$A , 0,$20, 8, 0} //リアナ
- %mandef(3)={$F , 0,$80, 2, -1} //学者
- %mandef(4)={$E , 1,$0C, 2, 0} //学者
- %mandef(5)={$C , 0,$A0, 2, 0} //学者
- %mandef(6)={$B , 0,$A4, 2, 0} //学者
- %mandef(7)={$E , 1,$00, 2, 0} //学者
- %mandef(8)={$F , 1,$40, 2, 3} //学者
- %mandef(9)={$B , 1,$04, 2, 0} //学者
- %mandef(10)={$C, 1,$08, 2, 0} //学者
- %mandef(11)={$C, 1,$60, 4, 2} //学者
- %mandef(12)={$F, 1,$20, 2, 3} //学者
-
- %mandef(13)={$4 , 0,$40, 2, -1} //本棚
- %mandef(14)={$6 , 0,$42, 2, -1} //本
- %mandef(15)={$9 , 0,$00, 4, -1} //カリス
- %mandef(16)={$A , 0,$20, 4, -1} //リアナ
-
- &on
- &manmove 2,8,8,8,8
- %mandef(2)={$A , 0,$20, 8, -1} //リアナ
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);うわー!w;図書館って、本がこんなにいっぱいあるんだ。pc
- %mandef(1)={$9 , 0,$00, 8, 0} //カリス
- &on
- &manmove 1,8,8
- %mandef(1)={$9 , 0,$00, 8, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、これを全部さがさなきゃ。pc
- %mandef(2)={$A , 0,$20, 8, 0} //リアナ
- &on
- &manmove 2,-2
- %mandef(2)={$A , 0,$20, 8, -1} //リアナ
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);ちょっとそれは無茶よ!;まずここにいる人に聞いてみようよ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);あっ、wああ。w;そうだよな。;ごめん。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);(カリス…)pc
-
- &contrast 0
- &wait 400
- &move 62,0,2
-
- %mandef(15)={$9 , 0,$00, 4, 0} //カリス
- &on
- &manmove 15,4,4,4,4,2
- %mandef(15)={$9 , 0,$00, 4, -1} //カリス
- &on
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);すいません。;少しお聞きしたいのですが。pc
- %mandef(3)={$F , 0,$81, 2, -1} //学者
- &on
- !o(1)j(2)学者j(0);ん、wなんだね。;歴史のことなら何でも答えてやるぞ。pc
- %mandef(16)={$A , 0,$20, 4, 0} //リアナ
- &on
- &manmove 16,4,4,4,4
- %mandef(16)={$A , 0,$20, 4, -1} //リアナ
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);リザレアって単語をご存じですか。;たぶん国名だと思うの
- !ですか。pc
- !o(1)j(2)学者j(0);リザレアだと…、
- %mandef(3)={$F , 0,$82, 2, -1} //学者
- %mandef(14)={$6 , 0,$43, 2, -1} //本
- &on
- &wait 10
- %mandef(14)={$6 , 0,$44, 2, -1} //本
- &on
- &wait 10
- %mandef(3)={$F , 0,$83, 2, -1} //学者
- %mandef(14)={$6 , 0,$45, 2, -1} //本
- &on
- &wait 5
- %mandef(14)={$6 , 0,$46, 2, -1} //本
- &on
- &wait 5
- %mandef(14)={$6 , 0,$47, 2, -1} //本
- &on
- &wait 5
- %mandef(14)={$6 , 0,$48, 2, -1} //本
- &on
- &wait 5
- %mandef(14)={$6 , 0,$49, 2, -1} //本
- &on
- !ちょっと待っていたまえ。pc
- %mandef(3)={$F , 0,$84, 2, -1} //学者
- &on
- &wait 20
- %mandef(3)={$F , 0,$85, 2, -1} //学者
- &on
- &manmove 3,8,8
- %manpoint(3)={100,100}
- %mandef(17)={$F , 0,$60, 8, 0} //学者
- %manpoint(17)={44,12}
- &on
-
- %mandef(15)={$9 , 0,$00, 8, 0} //カリス
- &on
- &manmove 15,4,4,-6
- %mandef(15)={$9 , 0,$00, 8, -1} //カリス
- &on
-
- &manmove 17,8,8,6,6,6,8,-8
- &wait 80
- %mandef(13)={$4 , 0,$41, 2, -1} //本棚
- &on
- &manmove 17,2,4,4,4,2,2
- %manpoint(17)={100,100}
- %mandef(3)={$F , 0,$85, 2, -1} //学者
- %manpoint(3)={44,12}
- &on
- &manmove 3,2,2
- %mandef(3)={$F , 0,$84, 2, -1} //学者
- &on
- &wait 20
- %mandef(3)={$F , 0,$81, 2, -1} //学者
- %mandef(14)={$6 , 0,$4A, 2, -1} //本
- &on
-
- %mandef(15)={$9 , 0,$00, 8, 0} //カリス
- &on
- &manmove 15,-2
- %mandef(15)={$9 , 0,$00, 8, -1} //カリス
- %mandef(16)={$A , 0,$20, 8, 0} //リアナ
- &on
- &manmove 16,4,4,4,-2
- %mandef(16)={$A , 0,$20, 8, -1} //リアナ
- &on
-
- !o(1)j(2)学者j(0);【英雄伝 詩人ギルニーク著作】確かこの本だ。;ん、w;大昔
- !の詩人が書いた冒険談だよ。p;けっこう有名なお伽話しなんだがね。;
- !一千年ほど前に闇に閉ざされた世界を救った英雄たちの物語だ。p;私が思
- !うにだいぶ誇張はされているが実話だよ。pc
- &monsprint 160,32,リアナ1
- !o(1)j(2)リアナj(0);へえ。pc
- !o(1)j(2)学者j(0);えーと…。;
- %mandef(3)={$F , 0,$82, 2, -1} //学者
- &on
- &wait 10
- %mandef(14)={$6 , 0,$4B, 2, -1} //本
- &on
- &wait 10
- %mandef(3)={$F , 0,$83, 2, -1} //学者
- %mandef(14)={$6 , 0,$4C, 2, -1} //本
- &on
- &wait 20
- %mandef(3)={$F , 0,$80, 2, -1} //学者
- &on
- !ここだ、魔都リザレアの章。pc
- &bgm -1
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);リザレア!pc
-
- &bgm 7
- &monsprint 0,0,背景1
- &monsprint 128,0,背景1
- &monsprint 0,128,背景1
- &monsprint 128,128,背景1
- &wait 20
- &monsprint 0,0,背景2
- &monsprint 128,0,背景2
- &monsprint 0,128,背景2
- &monsprint 128,128,背景2
- &wait 20
- &monsprint 0,0,背景3
- &monsprint 128,0,背景3
- &monsprint 0,128,背景3
- &monsprint 128,128,背景3
- &wait 100
- &monsprint 0,0,文1
- &wait 250
- &monsprint 0,48,文2
- &wait 350
- &monsprint 0,64,文3
- &wait 350
- &monsprint 0,80,文4
- &wait 350
- &monsprint 0,96,文5
- &wait 350
- &monsprint 0,112,文6
- &wait 350
- &monsprint 0,128,文7
- &wait 350
- &monsprint 0,144,文8
- &wait 350
- &monsprint 0,160,文9
- &wait 350
- &monsprint 0,176,文10
- &wait 350
- &monsprint 0,192,文11
- &wait 350
- &monsprint 0,208,文12
- &wait 350
- &monsprint 0,224,文13
- &wait 200
- &bgm -1
- &wait 300
- &monsprint 0,0,背景2
- &monsprint 128,0,背景2
- &monsprint 0,128,背景2
- &monsprint 128,128,背景2
- &wait 20
- &monsprint 0,0,背景1
- &monsprint 128,0,背景1
- &monsprint 0,128,背景1
- &monsprint 128,128,背景1
- &wait 20
- &monsprint 0,0,消し
- &monsprint 128,0,消し
- &monsprint 0,128,消し
- &monsprint 128,128,消し
-
- &bgm 33
- %mandef(3)={$F , 0,$81, 2, -1} //学者
- &on
- !o(1)j(2)学者j(0);リザレアというのは今から一千年前に存在しておった国と言
- !われておる。p;ちょうど現在盛んに信仰されているオルトン教の発生と
- !同じ時期だろう。pc
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);じゃあ、リザレアはもう存在していない?pc
- !o(1)j(2)学者j(0);ああ、w一千年前に魔王ゾロンの死と共にな。p;その魔王を倒
- !した英雄の一人、神の伝導師というのがオルトン教のオルトンと言われ
- !ておる。pc
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);ゾロン…。p
- !o(1)j(2)カリスj(0);(なんだこの感じ、もの凄く不快だ…)pc
- &monsprint 160,32,リアナ1
- !o(1)j(2)リアナj(0);リザレアはもう無いのね…。pc
- !o(1)j(2)学者j(0);そうだなあ。w;話しの筋からよむと今の蛮族たちが棲んでい
- !る東大陸にリザレアがあったらしいが。pc
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);東大陸…。pc
- !o(1)j(2)学者j(0);そうだ。w;私がリザレアについて知ってるのはこのくらいだ。
- !pc
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);東大陸にはどうやって行けば。pc
- !o(1)j(2)学者j(0);ん、w学問の都リーナスの学者や冒険家が何度か上陸している
- !らしいが。pc
- %mandef(15)={$9 , 0,$00, 8, 0} //カリス
- &on
- &manmove 15,-8
- %mandef(15)={$9 , 0,$00, 8, -1} //カリス
- &on
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);リーナスか。pc
- !o(1)j(2)学者j(0);どうかね。;お役に立てたかい。pc
- &monsprint 160,32,リアナ1
- !o(1)j(2)リアナj(0);ええ、ありがとう。pc
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);…。pc
- %mandef(16)={$A , 0,$20, 8, 0} //リアナ
- &on
- &manmove 16,-4
- %mandef(16)={$A , 0,$20, 8, -1} //リアナ
- &on
- &monsprint 160,32,リアナ1
- !o(1)j(2)リアナj(0);(カリス…)p
- %mandef(16)={$A , 0,$20, 8, 0} //リアナ
- &on
- &manmove 16,-2
- %mandef(16)={$A , 0,$20, 8, -1} //リアナ
- &on
- !o(1)j(2)リアナj(0);じゃあ、失礼します。pc
- %mandef(3)={$F , 0,$80, 2, -1} //学者
- &on
- 進行=24
- &contrast 0
- &wait 200
- &goto IV10
-
- //━━━━━━━━━━━━━━━━━━━━━━
- //━━━━━━━━━━━━━━━━━━━━━━
- [IV15]//広場
- &bgm 23
- &sppsp CHR\IV15.SPP
- &map MAP\IV15.MAP //マップの設定
- &mapsp MAP\MATI4.SP //BGの設定
- &mappal MAP\MATI4.PAL //BGパレットの設定
- &partyspeed 1
- &partyset 2,1
- %partypoint={21,40,-4}
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- // %mandef(4)={$9 , 0,$20, 2, -1} //カリス
- // %mandef(5)={$A , 0,$40, 2, -1} //リアナ
- %mandef(6)={$B , 0,$60, 2, -1} //ルシェル
- %mandef(7)={$E , 0,$68, 2, -1} //異端審問官
- %mandef(8)={$F , 0,$64, 2, -1} //死刑執行人
- %mandef(9)={$F , 0,$67, 2, -1} //死刑執行人
- %mandef(10)={$D, 0,$E0, 2, -1} //聖騎士
- %mandef(11)={$D, 0,$E0, 2, -1} //聖騎士
- %mandef(12)={$D, 0,$E0, 2, -1} //聖騎士
- %mandef(13)={$D, 0,$E0, 2, -1} //聖騎士
- %mandef(14)={$B, 0,$6F, 2, -1} //護衛
- %mandef(15)={$B, 0,$6F, 2, -1} //護衛
- %mandef(16)={$B, 0,$6F, 2, -1} //護衛
- %mandef(17)={$B, 0,$6F, 2, -1} //護衛
- %mandef(18)={$E, 1,$00, 8, -1} //神父
- %mandef(19)={$B, 1,$00, 8, -1} //神父
- %mandef(20)={$B, 1,$20, 8, -1} //老人
- %mandef(21)={$F, 1,$20, 8, -1} //老人
- %mandef(22)={$9, 1,$40, 8, -1} //若者男
- %mandef(23)={$F, 1,$40, 8, -1} //若者男
- %mandef(24)={$9, 1,$60, 8, -1} //貴族
- %mandef(25)={$D, 1,$60, 8, -1} //貴族
- %mandef(26)={$B, 1,$80, 8, -1} //主婦
- %mandef(27)={$C, 1,$80, 8, -1} //主婦
- %mandef(28)={$A, 1,$A0, 8, -1} //女若者
- %mandef(29)={$E, 1,$A0, 8, -1} //女若者
- %mandef(30)={$F, 1,$C0, 8, -1} //子供
-
- &on
- &partymove 4,4,-4,-8
- &wait 30
- &partymove 4,4,4,4,-4,-8
-
- &wait 60
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);何だろう?pc
- !o(1)j(2)民衆j(0);魔女の処刑だってよ。;ほら、あの娘だよ。pc
- !o(1)j(2)民衆j(0);あんなかわいい顔して恐ろしいな。pc
- &partymove 8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8
- %mandef(4)={$9 , 0,$20, 8, -1} //カリス
- %mandef(2)={$A , 0,$40, 8, -1} //リアナ
- %manpoint(4)={15,25}
- %manpoint(2)={15,22}
- &partyset 0
- &on
- &partymove 8,8,8,8,8,8,8
- &partyspeed 2
- &partymove 8,8,8,8,8,8,8,8,8,8,8,8,8,4,4
- &partyspeed 1
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…あれは。pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);ルシェル!w;セフラであったルシェルよ!;いったいどうし
- !て!pc
- %mandef(7)={$E , 0,$69, 2, -1} //異端審問官
- &on
- !o(1)j(2)異端審問官j(0);この者はアザム国へ布教活動に赴こうとしていた、ハ
- !ミエル神父以下8名を殺害せし魔女である。p;その重き罪によって死刑
- !を宣告し、これより処刑を執り行う。pc
- %mandef(6)={$B , 0,$61, 2, -1} //ルシェル
- &on
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);そんなっ!w;私はそのようなことはしておりません!pc
- %mandef(7)={$E , 0,$6A, 2, -1} //異端審問官
- &on
- !o(1)j(2)異端審問官j(0);えーい黙れ、魔女め!w;さあ、やれ!pc
- %mandef(6)={$B , 0,$62, 2, -1} //ルシェル
- &on
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);(これが私が信じてきたものなの、これが神が私に下し
- !た運命なの、このようなことが…)pc
- %mandef(8)={$F , 0,$65, 2, -1} //死刑執行人
- &on
- %mandef(2)={$A , 0,$40, 8, 0} //リアナ
- &on
- &manmove 2,8
- %mandef(2)={$A , 0,$40, 8, -1} //リアナ
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);違う。w;彼女はそんなことしてないわ!pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);リアナ、ダメだ!pc
- %mandef(2)={$A , 0,$40, 8, 0} //リアナ
- &on
- &manmove 2,8
- %manpoint(2)={100,100}
- %mandef(5)={$A , 0,$40, 2, -1} //リアナ
- %manpoint(5)={15,20}
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);(こんなことが許されちゃいけない!)pc
- %mandef(4)={$9 , 0,$20, 8, 0} //カリス
- &on
- &manmove 4,8
- %mandef(4)={$9 , 0,$20, 8, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);やめるんだっ!pc
- X=88
- Y=30
- &jsr 魔法2
-
- %mandef(8)={$F , 0,$66, 2, -1} //死刑執行人
- &on
- !o(1)j(2)異端審問官j(0);な、wなんだっ!pc
- %mandef(7)={$E , 0,$A4, 2, 0} //異端審問官
- %mandef(9)={$F , 0,$A0, 2, 0} //死刑執行人
- %mandef(18)={$E, 1,$00, 8, 1} //神父
- %mandef(19)={$B, 1,$00, 8, 1} //神父
- %mandef(20)={$B, 1,$20, 8, 1} //老人
- %mandef(21)={$F, 1,$20, 8, 1} //老人
- %mandef(22)={$9, 1,$40, 8, 1} //若者男
- %mandef(23)={$F, 1,$40, 8, 1} //若者男
- %mandef(24)={$9, 1,$60, 8, 1} //貴族
- %mandef(25)={$D, 1,$60, 8, 1} //貴族
- %mandef(26)={$B, 1,$80, 8, 1} //主婦
- %mandef(27)={$C, 1,$80, 8, 1} //主婦
- %mandef(28)={$A, 1,$A0, 8, 1} //女若者
- %mandef(29)={$E, 1,$A0, 8, 1} //女若者
- %mandef(30)={$F, 1,$C0, 8, 1} //子供
- %mandef(10)={$D, 0,$E0, 2, 0} //聖騎士
- %mandef(11)={$D, 0,$E0, 2, 0} //聖騎士
- %mandef(12)={$D, 0,$E0, 2, 0} //聖騎士
- %mandef(13)={$D, 0,$E0, 2, 0} //聖騎士
- %mandef(14)={$B, 1,$E0, 2, 2} //護衛
- %mandef(15)={$B, 1,$E0, 2, 2} //護衛
- %mandef(16)={$B, 1,$E0, 2, 2} //護衛
- %mandef(17)={$B, 1,$E0, 2, 2} //護衛
- &on
- !o(1)j(2)民衆j(0);うわーっ!w;魔法だっ!pc
- !o(1)j(2)民衆j(0);魔女が襲ってきたー!pc
- !o(1)j(2)民衆j(0);きゃー、魔女よ、魔女ー!pc
- %mandef(6)={$B , 0,$63, 2, -1} //ルシェル
- &on
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);(えっ、いったい?)pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ちっ、wリアナ、援護を頼むっ!pc
- X=150
- Y=60
- &jsr 魔法2
- %mandef(1)={$9 , 0,$20, 8, 1} //カリス
- %manpoint(1)={15,24}
- %manpoint(4)={100,100}
- &on
- &manmove 1,4,4,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,4,8,8
- %mandef(1)={$9 , 0,$20, 8, -1} //カリス
- &on
-
- &patternpal GR\CG3.PAL //モンスター用パレット
- &bgm 0
- &pcm 9
- &partyset 1
-
- &battle $1000,14,61,1,62,1
- &partyset 0
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &bgm 23
- &patternpal GR\CG.PAL //CG用パレット
-
- %manpoint(8)={100,100}
- %manpoint(9)={100,100}
- %mandef(1)={$9 , 0,$20, 8, 1} //カリス
- &on
- &manmove 1,8,8,8,6,6,-6
- %mandef(1)={$9 , 0,$20, 8, -1} //カリス
- %mandef(31)={$6, 0,$6C, 2, -1} //台
- %mandef(6)={$B , 0,$84, 2, -1} //ルシェル
- %manpoint(6)={15,3}
- %manpoint(31)={15,5}
- &on
- X=46
- Y=24
- &jsr 魔法2
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);さあ、走れるか。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);あなたは!pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);話しは後だ、走るぞ!pc
- %manpoint(6)={100,100}
- %manpoint(1)={100,100}
- &partyset 1,4
- &on
- X=200
- Y=30
- &jsr 魔法2
- &partymove 4,2,2,2,2
- X=30
- Y=20
- &jsr 魔法2
- &partymove 2,2,2,2,2,2
- %mandef(7)={$E , 0,$6B, 2, -1} //異端審問官
- &on
- !o(1)j(2)異端審問官j(0);えーい、何をしておる。;捕らえろ!w;捕らえろ!pc
- &partymove 2,2,2,2,2,2,2,2,-6
- X=170
- Y=20
- &jsr 魔法2
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);さあ、リアナ行くぞ!pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);先に行って、もう少し足止めしないと直ぐに追い付かれる
- !から!pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);だけどっ!pc
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);いいから早く行って、集中出来ない!pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);くっ、w直ぐに来いよ!pc
- X=80
- Y=54
- &jsr 魔法2
-
- &partyset 0
- %mandef(1)={$9 , 0,$20, 8, 1} //カリス
- %manpoint(1)={12,20}
- %mandef(3)={$B , 0,$80, 2, -1} //ルシェル
- %manpoint(3)={12,17}
- &on
- &manmove 1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
- %mandef(1)={$9 , 0,$20, 8, -1} //カリス
- %manpoint(1)={100,100}
- &on
- X=150
- Y=64
- &jsr 魔法2
- %mandef(3)={$B , 0,$80, 2, 1} //ルシェル
- &on
- &manmove 3,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
- %mandef(3)={$B , 0,$80, 2, -1} //ルシェル
- %manpoint(3)={100,100}
- &on
- &manmove 14,6,6,6,6,2,2,2
- %mandef(14)={$B, 1,$E0, 2, 0} //護衛
- &on
- X=80
- Y=96
- &jsr 魔法2
- &manmove 15,6,6,6,6
- %mandef(15)={$B, 1,$E0, 2, 0} //護衛
- &on
- X=40
- Y=50
- &jsr 魔法2
- &manmove 16,4,4,4,4,2,2,2
- %mandef(16)={$B, 1,$E0, 2, 0} //護衛
- &on
- X=150
- Y=96
- &jsr 魔法2
- &manmove 17,4,4,4,4
- %mandef(17)={$B, 1,$E0, 2, 0} //護衛
- &on
- X=180
- Y=50
- &jsr 魔法2
-
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);(…ほらね、ちゃんと役に立ってるでしょ)pc
-
- &manmove 11,6,6,2,2,2,2,2
- X=70
- Y=34
- &jsr 魔法2
- &manmove 10,2,2,2,2,6,6,6,6
- X=50
- Y=24
- &jsr 魔法2
- &manmove 12,4,4,2,2,2,2,2
- X=150
- Y=34
- &jsr 魔法2
- &manmove 13,2,2,2,2,4,4,4,4
- X=182
- Y=20
- &jsr 魔法2
-
- %mandef(7)={$E , 0,$C0, 2, 0} //異端審問官
- &on
- !o(1)j(2)異端審問官j(0);くっー!w;何をしておるか、どけー!pc
- &manmove 7,4,4,2,2,2
- X=122
- Y=60
- &jsr 魔法2
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);それ以上近づくと、地面じゃすまないわよ!pc
- !o(1)j(2)異端審問官j(0);きーっ!w;こんな小娘に脅されてなるものかっ!pc
- &manmove 7,2,2,2
- %mandef(5) ={$A , 0,$41, 0, -1} //リアナ
- &on
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);はっ!pc
- %mandef(7)={$E , 0,$6D, 2, -1} //異端審問官
- &on
- !o(1)j(2)異端審問官j(0);はうっ!pc
- %mandef(5) ={$A , 0,$40, 0, -1} //リアナ
- &on
- &wait 50
- %mandef(5) ={$A , 0,$43, 0, -1} //リアナ
- &on
- &wait 15
- %mandef(5) ={$A , 0,$48, 0, -1} //リアナ
- &on
- &wait 15
- %mandef(5) ={$A , 0,$49, 0, -1} //リアナ
- &on
- &wait 15
- %mandef(5) ={$A , 0,$4A, 0, -1} //リアナ
- &on
- &wait 20
- %mandef(5) ={$A , 0,$4B, 0, -1} //リアナ
- &on
- &wait 20
- %mandef(5) ={$A , 0,$6E, 0, -1} //リアナ
- &on
- %mandef(7)={$E , 0,$C0, 2, -1} //異端審問官
- &on
- !o(1)j(2)異端審問官j(0);ハアwハア…。w;脅かしおって、さあ、捕らえろ!pc
- %mandef(7)={$E , 0,$C0, 2, 0} //異端審問官
- &on
- &manmove 7,2,2
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);(2人とも逃れたかなぁ…)pc
- %mandef(7)={$E , 0,$6A, 2, -1} //異端審問官
- &on
- !o(1)j(2)異端審問官j(0);逃げた連中も早く捜し出しなさい!pc
- &contrast 0
- &wait 200
- &goto IV15_
- &label 魔法2
- %mandef(5) ={$A , 0,$41, 0, -1} //リアナ
- &on
- &monsprint X,Y,魔法_21
- &wait 5
- &monsprint X,Y,魔法_22
- &wait 5
- &monsprint X,Y,魔法_23
- &wait 5
- %mandef(5) ={$A , 0,$42, 0, -1} //リアナ
- &on
- &pcm 16
- &freash $CF80
- &monsprint X,Y,魔法_24
- &wait 5
- &monsprint X,Y,魔法_25
- &wait 5
- &monsprint X,Y,魔法_26
- %mandef(5) ={$A , 0,$41, 0, -1} //リアナ
- &on
- &wait 5
- &monsprint X,Y,消し
- &rts
-
- //━━━━━━━━━━━━━━━━━━━━━━
- //━━━━━━━━━━━━━━━━━━━━━━
- [IV15_]//町外れ
- &map MAP\IV15_.MAP //マップの設定
- &mapsp MAP\MATI4.SP //BGの設定
- &mappal MAP\MATI4.PAL //BGパレットの設定
- &partyspeed 1
- &partyset 1,4
- %partypoint={21,15,-4}
-
- &on
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);リアナさんは…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…遅いな。pc
- &wait 100
-
- %mandef(1)={$D, 0,$E0, 6, 0} //聖騎士
- %manpoint(1)={0,14}
- &on
- &manmove 1,6,6
- %mandef(1)={$D, 0,$E0, 6, -1} //聖騎士
- &on
- !o(1)j(2)騎士j(0);あれだ!w;いたぞっ!pc
- %mandef(2)={$D, 0,$E0, 6, 0} //聖騎士
- %manpoint(2)={0,16}
- &on
- &manmove 2,6,6,6,6
- %mandef(2)={$D, 0,$E0, 6, -1} //聖騎士
- &on
- %mandef(3)={$D, 0,$E0, 6, 0} //聖騎士
- %manpoint(3)={0,19}
- &on
- &manmove 3,6,6,6
- %mandef(3)={$D, 0,$E0, 6, -1} //聖騎士
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ちきしょーっ!w
- &partymove -6
- !;さあ、逃げるぞっ!pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);でも、リアナさんがっ!pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);いいから、行くぞ!p
- !o(1)j(2)カリスj(0);(くっ、何をしてるんだリアナ!;頼むっ!w;無事でいてくれ!)pc
- &partyspeed 2
- &on
- &contrast 0
- &partymove 6,6,6,6,6,6,6,6,6,6
- 進行=25
- &goto IV11
-
- //━━━━━━━━━━━━━━━━━━━━━━
- //━━━━━━━━━━━━━━━━━━━━━━
- [IV16]//伯爵宅近辺の森
- &bgm 23
- &sppsp CHR\IV16.SPP
- &map MAP\IV16.MAP //マップの設定
- &mapsp MAP\IV16.SP //BGの設定
- &mappal MAP\IV16.PAL //BGパレットの設定
- &partyset 0
- %partypoint={0,15,2}
- &partyspeed 1
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1)={$A , 0,$06, 2, -1} //リアナ
- %mandef(2)={$9 , 0,$04, 2, -1} //カリス
- %manpoint(2)={14,46}
- // %mandef(3)={$9 , 0,$20, 2, -1} //カリス
- %mandef(4)={$B , 0,$40, 8, -1} //ルシェル
- // %mandef(5)={$A , 0,$00, 8, -1} //執事
- %mandef(6)={$D , 0,$08, 2, -1} //聖騎士
- %mandef(7)={$D , 0,$09, 2, -1} //聖騎士
- %mandef(8)={$D , 0,$09, 2, -1} //聖騎士
- %mandef(9)={$D , 0,$0A, 2, -1} //聖騎士
- %mandef(10)={$D, 0,$0B, 2, -1} //聖騎士
-
-
- &on
- &partymove 2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);聖騎士団か。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);まさか、伯爵様まで…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ちっ…。pc
- &wait 50
-
- %mandef(5)={$A , 0,$00, 8, 0} //執事
- %manpoint(5)={15,63}
- &on
- &manmove 5,8,8,8,8,8,8,8,8
- %mandef(5)={$A , 0,$00, 8, -1} //執事
- %mandef(4)={$B , 0,$40, 8, 0} //ルシェル
- &on
- !o(1)j(2)執事j(0);カリス殿ですな。pc
- &manmove 4,-2
- %mandef(2)={$9 , 0,$05, 2, -1} //カリス
- %mandef(4)={$B , 0,$40, 8, -1} //ルシェル
- &on
-
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);あなたは、確か伯爵様の執事の方。pc
- !o(1)j(2)執事j(0);さようです。p;ご覧のとおり、貴方方のことで聖騎士団が伯
- !爵様を取り調べに来ているのです。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…すまない。pc
- !o(1)j(2)執事j(0);なに、w大した証拠は無いのです。;ですからご心配には及び
- !ません。p;ですが、今直ぐにこの町を出られなさい。;非常配備が引か
- !れようとしています。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);だけど、リアナさんを早くお医者様に診せないとpc
- !o(1)j(2)執事j(0);看守のトニオより聞き及んでおります。p;ですが、この町の
- !医者にはすでに聖騎士団の手が回っていましょう。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);じゃあ、どうしたら。pc
- !o(1)j(2)執事j(0);無理をしてでも…、wそうティットに向かいなさい。;あそこに
- !は私の知り合いの医師がおります。p;オスカーと申す者です。;アルダム
- !の知り合いだと言えば、よくしてくれるでしょう。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);ティットですか。;国境を越えて、w…少し遠いですね。p
- !c
- !o(1)j(2)執事j(0);だが、聖騎士団のことを考えたら、遠くても国境を越えてテ
- !ィットへ向かうのが良策ですpc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);わかった。;ティットへ向かうよ。p;ルシェル、君はどうする
- !。pc
- %mandef(4)={$B , 0,$40, 8, 0} //ルシェル
- &on
- &manmove 4,-8
- %mandef(4)={$B , 0,$40, 8, -1} //ルシェル
- &on
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);あの、wお邪魔じゃなかったら、私も一緒に行かせて下さ
- !い。p;どうせ、もう…。w;それに、元気になったリアナさんにちゃんと
- !お礼を言わないと気が済みません。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ。wさっきは済まなかった。;足手間といだなんていっ
- !て、君が居てずいぶん助かったよ。p;リアナの応急手当もしてくれたし
- !。;さあ、早く町を出よう。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);はいっ、wカリスさん。pc
- !o(1)j(2)執事j(0);では、どうかお気を付けて。pc
- %mandef(4)={$B , 0,$40, 8, 0} //ルシェル
- &on
- &manmove 4,-2
- %mandef(4)={$B , 0,$40, 8, -1} //ルシェル
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ありがとう、アルダムさん。;伯爵にもよろしくとお伝え下
- !さい。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);お世話になりました。;伯爵様とアルダムさんに神のご加
- !護があらんことを。pc
- &contrast 0
- &wait 200
- &partyset 1,4
- &goto2 FIELD,102,58,2
-
- //━━━━━━━━━━━━━━━━━━━━━━
- //━━━━━━━━━━━━━━━━━━━━━━
- [IV17]//森 野宿
- &if(進行==27){&bgm 36}
- &if(進行==28){&bgm 0}
- &sppsp CHR\IV16.SPP
- &map MAP\IV17.MAP //マップの設定
- &mapsp MAP\IV17.SP //BGの設定
- &mappal MAP\IV17.PAL //BGパレットの設定
- &partyset 0
- &partyspeed 1
- %partypoint={0,0,2}
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1)={$9 , 0,$80, 2, -1} //カリス
- %mandef(2)={$B , 0,$A0, 2, -1} //ルシェル
- &if(進行==28){
- %mandef(1)={$9 , 0,$83, 2, -1} //カリス
- %mandef(2)={$B , 0,$A3, 2, -1} //ルシェル
- }
- %mandef(3)={$A , 0,$6A, 2, -1} //リアナ
- %mandef(4)={$A , 0,$6B, 2, -1} //リアナ
- %mandef(5)={$3 , 0,$60, 2, 0} //焚火
- %mandef(6)={$3 , 0,$64, 2, 0} //焚火
-
-
- &on
- &if(進行==27){
- &partymove 2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);w私、w捨て子だったんです。p;修道院の前に捨て
- !られてたそうで、それでそこの修道院で育てられました。p;
- %mandef(1)={$9 , 0,$81, 2, -1} //カリス
- &on
- !ですから神を実の親のようにも思って生きてきたんです。;その同
- !じ神を信じる人間がこんな酷いことをするなんて…。p;
- %mandef(2)={$B , 0,$A1, 2, -1} //ルシェル
- &on
- !どうして人は人を傷つけてしか生きていけないのでしょう。;同
- !じ神の子なのに、なぜなのでしょう…。pc
- &partymove 2,2,2,2
- %mandef(2)={$B , 0,$A0, 2, -1} //ルシェル
- &on
- &partymove 2,2,2
- %mandef(1)={$9 , 0,$80, 2, -1} //カリス
- &on
- &partymove 2,2,2,2,2,2,2,2,2,2,2,2
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…そこらへんの問答はちょっとオレにはわかんな
- !いな。p;
- %mandef(2)={$B , 0,$A1, 2, -1} //ルシェル
- &on
- !君が自分の事を話してくれたから、オレも話すよ。;
- !オレはリアナと出会う四ヶ月前より以前の記憶が無いんだ。p;
- !それで記憶を取り戻すために旅をしてる。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);…まあ。w;
- %mandef(1)={$9 , 0,$81, 2, -1} //カリス
- &on
- !そうだったのですか。;早く記憶が戻ることをお祈りします。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ、ありがとう。p
- %mandef(1)={$9 , 0,$82, 2, -1} //カリス
- &on
- !o(1)j(2)カリスj(0);(だけど、そのためにリアナをこんな…)pc
- &partymove 2,2,2,2,2
- %mandef(2)={$B , 0,$A2, 2, -1} //ルシェル
- &on
- &partymove 2,2,2,2,2,2,2,2,2,2
- %mandef(2)={$B , 0,$A0, 2, -1} //ルシェル
- &on
- &partymove 2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
- %mandef(1)={$9 , 0,$80, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ふう…。w;
- %mandef(2)={$B , 0,$A1, 2, -1} //ルシェル
- &on
- !確かに人は人を傷つけて生きてしまう。
- !p;でも人は人に与えることもできる。;バレシアの皆
- !やリアナがオレにしてくれたように。p
- %mandef(1)={$9 , 0,$82, 2, -1} //カリス
- &on
- !o(1)j(2)カリスj(0);(リアナ、すまない。w;ちゃんと君を護れなかっ
- !た)pc
- %mandef(2)={$B , 0,$A0, 2, -1} //ルシェル
- &on
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);w…そうかも知れませんね。w;私も何度と無く人
- !を傷つけて生きてきたのかも知れません。p;そうなら、それ以
- !上に人に与えて生きていけるように努力します。;それが私の
- !信じる神の道…。pc
- %mandef(1)={$9 , 0,$81, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ん、wああ…。w;
- %mandef(2)={$B , 0,$A1, 2, -1} //ルシェル
- &on
- !さあ、おしゃべりはやめにしてもう寝よう。;明日にひびく。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);はい、それじゃカリスさん、
- %mandef(2)={$B , 0,$A2, 2, -1} //ルシェル
- &on
- !w…リアナさん、お休みなさい。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);お休み。pc
-
- &contrast 0
- &wait 200
- &goto IV18
- }
-
- // カリス目覚める。
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);はあ、はあ…。p
- !o(1)j(2)カリスj(0);(一体なんなんだ、この夢は。w;この強い傷みは。w;判か
- !らない。p;いったいオレは何者なんだっ!)pc
-
- &partymove 2,2,2,2,2,2,2,2,2,2,2,2,2,2
- &pcm 20
- &partymove 2,2,2,2
- %mandef(1)={$9 , 0,$84, 2, -1} //カリス
- &on
- &partymove -2
- %mandef(1)={$9 , 0,$85, 2, -1} //カリス
- &on
- &partymove -2
- %mandef(1)={$9 , 0,$86, 2, -1} //カリス
- &on
- &partymove 2,2,2,2,2
- %mandef(2)={$B , 0,$A4, 2, -1} //ルシェル
- &on
- &partymove 2
- %mandef(2)={$B , 0,$A5, 2, -1} //ルシェル
- &on
- &partymove 2
- %mandef(2)={$B , 0,$A1, 2, -1} //ルシェル
- &on
- &partymove 2
- %mandef(2)={$B , 0,$A6, 2, -1} //ルシェル
- &on
- &partymove 2,2,2,2,2,2
-
- %mandef(2)={$B , 0,$A1, 2, -1} //ルシェル
- &on
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);wカリスさん、今のは…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);何だ!?w…遠くの方から聞こえてきた。ww;
- %mandef(1)={$9 , 0,$87, 2, -1} //カリス
- &on
- !とりあえず、オレが朝まで見張っているから、ルシェルは眠ってていい
- !よ。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);でも…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);オレはもう充分に眠ったよ。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);…わかりました。w;お休みなさい。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ああ。p
- %mandef(1)={$9 , 0,$88, 2, -1} //カリス
- &on
- !o(1)j(2)カリスj(0);(どうせ、もう眠れやしないさ…)pc
-
- &contrast 0
- &wait 500
- &mappal MAP\IV17_.PAL //BGパレットの設定
- %mandef(1)={$9 , 0,$24, 2, -1} //カリス
- %mandef(2)={$B , 0,$48, 2, -1} //ルシェル
- %mandef(5)={$3 , 0,$68, 2, -1} //焚火
- %mandef(6)={$3 , 0,$69, 2, -1} //焚火
- &on
- &contrast 15
- &wait 100
-
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);よく眠れたかい、ルシェル。pc
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);ええ、早くティットへ向かいましょう。pc
- %mandef(1)={$9 , 0,$24, 2, 0} //カリス
- &on
- &manmove 1,-6
- %mandef(1)={$9 , 0,$24, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(リアナ、もう少しの辛抱だ)p
- %mandef(1)={$9 , 0,$24, 2, 0} //カリス
- &on
- &manmove 1,-2
- %mandef(1)={$9 , 0,$24, 2, -1} //カリス
- &on
- !o(1)j(2)カリスj(0);さあ、行こう。pc
-
- &contrast 0
- &wait 200
- &partyset 1,4
- &complete
- &goto2 FIELD,@15,2
-
- //━━━━━━━━━━━━━━━━━━━━━━
- //━━━━━━━━━━━━━━━━━━━━━━
- [IV18]//悪夢2
- &bgm 10
- &sppsp CHR\IV16.SPP
- &map MAP\IV18.MAP //マップの設定
- &mapsp MAP\IV18.SP //BGの設定
- &mappal MAP\IV18.PAL //BGパレットの設定
- &partyset 0
- %partypoint={0,0,2}
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1)={$8 , 1,$00, 8, 0} //老人
- %mandef(5)={$6 , 1,$40, 8, 0} //老婆
- %mandef(6)={$5 , 1,$C8, 2, 0} //女
- %mandef(7)={$5 , 1,$C0, 4, 0} //男
- %mandef(8)={$6 , 1,$80, 4, 0} //アベル
- %mandef(9)={$5 , 0,$C0, 6, 0} //男
- %mandef(10)={$4, 0,$E0, 4, 0} //男
- %mandef(11)={$4, 1,$A0, 8, 3} //女
- %mandef(14)={$8, 1,$2E, 2, -1} //老人
- %mandef(15)={$8, 1,$2F, 2, -1} //老人
-
- &on
- &monsprint 0,80,悪夢2
- &wait 200
- &monsprint 0,80,消し
- &monsprint 128,80,消し
-
- &wait 100
-
- &manmove 1,8,8,8,8,8,8,8,8
- %mandef(1)={$8 , 1,$00, 8, -1} //老人
- &on
- &manmove 5,2
- %mandef(5)={$6 , 1,$40, 2, -1} //老婆
- &on
- !o(1)j(2)村人j(0);まあ、旅の方。;エルシナの村へようこそ。;こちらで休んで
- !いきませんか。pc
- !o(1)j(2)老人j(0);神子はどこだ。pc
- !o(1)j(2)村人j(0);神子?w;まあ、あなたもあの方の奇跡の噂を聞いて来たので
- !すね。pc
- !o(1)j(2)老人j(0);どこだ。pc
- !o(1)j(2)村人j(0);えっ、wはい。w;この奥の教会におられますよ。pc
- !o(1)j(2)老人j(0);そうか、礼を言うぞ。pc
- %manpoint(1)={100,100}
- %manpoint(2)={15,16}
- %mandef(2)={$8 , 1,$00, 2, -1} //老人
- &on
- &wait 10
- %mandef(2)={$8 , 1,$01, 2, -1} //老人
- &on
- &wait 10
- &pcm 22
- %manpoint(3)={17,16}
- %mandef(2)={$8 , 1,$02, 2, -1} //老人
- %mandef(3)={$8 , 1,$04, 2, -1} //老人
- &on
- &wait 20
- %mandef(5)={$6 , 1,$44, 2, -1} //老婆
- %mandef(2)={$8 , 1,$03, 2, -1} //老人
- %mandef(3)={$8 , 1,$05, 2, -1} //老人
- &on
- &wait 20
- %mandef(5)={$6 , 1,$45, 2, -1} //老婆
- &on
- &wait 20
- %mandef(5)={$6 , 1,$46, 2, -1} //老婆
- &on
- &wait 20
- %mandef(5)={$6 , 1,$47, 2, -1} //老婆
- &on
- &wait 30
- %mandef(2)={$8 , 1,$01, 2, -1} //老人
- %manpoint(3)={100,100}
- &on
- &wait 30
- %mandef(2)={$8 , 1,$00, 2, -1} //老人
- &on
- &wait 30
- %mandef(2)={$8 , 1,$0C, 2, -1} //老人
- &on
- &wait 50
- %mandef(6)={$4 , 1,$CC, 2, -1} //女
- &on
-
- !o(1)j(2)村人j(0);きゃー!pc
- %mandef(6)={$4 , 1,$CD, 2, -1} //女
- &on
- &wait 10
- &manmove 7,-2
- &manmove 11,-2
- %mandef(11)={$4, 1,$8B, 2, -1} //女
- %mandef(7)={$5 , 1,$C0, 4, 1} //男
- &on
- &manmove 7,2,2
- %mandef(7)={$5 , 1,$C0, 2, -1} //男
- &on
- !o(1)j(2)村人j(0);きさま、一体!pc
- %mandef(9)={$5 , 0,$C0, 6, 1} //男
- &on
- &manmove 9,6,6,6,6,6,6,6,-2
- %mandef(9)={$5 , 0,$C0, 2, -1} //男
- %mandef(10)={$4, 0,$E0, 4, 1} //男
- &on
- &manmove 10,4,4,4,2,4,2,4,2,4,2,2,2,2,2,2
- %mandef(10)={$4, 0,$E0, 2, -1} //男
- &on
- !o(1)j(2)村人j(0);なんなんだ、てめえはっ!pc
- !o(1)j(2)老人j(0);邪魔だ、どけ。pc
- %mandef(8)={$6 , 1,$80, 4, 1} //アベル
- &on
- &manmove 8,4,4,4,4,4,4,4,4,4,4,4,-2
- %mandef(8)={$6 , 1,$80, 2, -1} //アベル
- &on
- &wait 20
- !o(1)j(2)村人j(0);か、母さん!w;畜生!ww
- %mandef(8)={$6 , 1,$88, 2, -1} //アベル
- &on
- &wait 10
- %mandef(8)={$6 , 1,$89, 2, -1} //アベル
- &on
- &wait 10
- %mandef(8)={$6 , 1,$8A, 2, -1} //アベル
- &on
- !;よくも母さんを!pc
- %mandef(16)={$6 , 1,$E0, 8, 1} //アベル
- %manpoint(8)={100,100}
- %manpoint(16)={19,26}
- &on
- &manmove 16,4,4,4,8,8,8,8,8,8,8,-2
- %mandef(16)={$6 , 1,$E0, 2, -1} //アベル
- &on
- &manmove 16,8
- %manpoint(3)={17,16}
- %mandef(2)={$8 , 1,$09, 2, -1} //老人
- %mandef(3)={$8 , 1,$07, 2, -1} //老人
- &on
- &wait 10
- %manpoint(3)={100,100}
- %mandef(2)={$8 , 1,$0A, 2, -1} //老人
- &on
- &wait 10
- &pcm 23
- %mandef(2)={$8 , 1,$0B, 2, -1} //老人
- %mandef(16)={$6, 1,$64, 2, -1} //アベル
- &on
- &wait 50
- %manpoint(17)={16,22}
- %mandef(16)={$6, 1,$65, 2, -1} //アベル
- %mandef(17)={$6, 1,$6A, 2, -1} //アベル
- &on
- &wait 10
- %manpoint(3)={17,16}
- %mandef(2)={$8 , 1,$09, 2, -1} //老人
- %mandef(3)={$8 , 1,$08, 2, -1} //老人
- %mandef(16)={$6, 1,$66, 2, -1} //アベル
- %mandef(17)={$6, 1,$6B, 2, -1} //アベル
- &on
- &wait 10
- %manpoint(3)={100,100}
- %mandef(2)={$8 , 1,$0C, 2, -1} //老人
- %mandef(16)={$6, 1,$67, 2, -1} //アベル
- %mandef(17)={$6, 1,$6C, 2, -1} //アベル
- &on
- &wait 10
- %mandef(16)={$6, 1,$68, 2, -1} //アベル
- %mandef(17)={$6, 1,$6D, 2, -1} //アベル
- &on
- &wait 10
- %mandef(16)={$6, 1,$69, 2, -1} //アベル
- %mandef(17)={$6, 1,$6E, 2, -1} //アベル
- &on
-
- !o(1)j(2)村人j(0);アベルっ!pc
- !o(1)j(2)村人j(0);きさまーっ!w;許さんぞ!pc
- &wait 50
- !o(1)j(2)老人j(0);面倒だ、皆殺しにしてやる。pc
- %mandef(2)={$8 , 1,$00, 2, -1} //老人
- &on
- &wait 10
- %mandef(2)={$8 , 1,$01, 2, -1} //老人
- &on
- &wait 10
- &pcm 22
- %manpoint(3)={17,16}
- %mandef(2)={$8 , 1,$02, 2, -1} //老人
- %mandef(3)={$8 , 1,$04, 2, -1} //老人
- &on
- &wait 10
- %mandef(2)={$8 , 1,$03, 2, -1} //老人
- %mandef(3)={$8 , 1,$05, 2, -1} //老人
- &on
- &wait 30
- %mandef(3)={$8 , 1,$06, 2, -1} //老人
- &on
- &pcm 24
- &monsprint 64,32,OP_S01A
- &wait 10
- &monsprint 64,32,OP_S01B
- &wait 10
- &monsprint 64,32,OP_S01C
- &wait 10
- &monsprint 64,32,OP_S01D
- %mandef(6)={$4 , 1,$CE, 2, -1} //女
- %mandef(7)={$5 , 1,$CF, 2, -1} //男
- %mandef(9)={$5 , 0,$C4, 2, -1} //男
- %mandef(10)={$4, 0,$C5, 2, -1} //男
- %mandef(11)={$4, 1,$8C, 2, -1} //女
- &on
- &wait 10
- &monsprint 64,32,消し
- &pcm 26
- &freash $5C0
- &wait 100
- %mandef(2)={$8 , 1,$01, 2, -1} //老人
- %manpoint(3)={100,100}
- %manpoint(5)={100,100}
- %manpoint(6)={100,100}
- %manpoint(7)={100,100}
- %manpoint(9)={100,100}
- %manpoint(10)={100,100}
- %manpoint(11)={100,100}
- %manpoint(16)={100,100}
- %manpoint(17)={100,100}
- &on
- &wait 30
- %mandef(2)={$8 , 1,$00, 2, -1} //老人
- &on
- &wait 30
- %mandef(2)={$8 , 1,$0C, 2, -1} //老人
- &on
-
- !o(1)j(2)老人j(0);ふっ、虫ケラどもめ。pc
-
- &wait 200
-
- %manpoint(4)={15,0}
- %mandef(4)={$7 , 1,$20, 2, 1} //神子
- &on
- &manmove 4,2,2,2,2,2,2,2,2,2,2
- %mandef(4)={$7 , 1,$24, 2, -1} //神子
- &on
- !o(1)j(2)神子j(0);あなたはっ!pc
- !o(1)j(2)老人j(0);久しいな、これで3度目だ。pc
- !o(1)j(2)神子j(0);そうみすみすとやられません。pc
- !o(1)j(2)老人j(0);無駄よ、お前を殺し。;あと2人で我が魂の封印は解かれる。
- !pc
- !o(1)j(2)神子j(0);そうはさせません!pc
- %mandef(4)={$7 , 1,$25, 2, -1} //神子
- &on
- &wait 10
- %manpoint(12)={15,12}
- %mandef(12)={$C , 1,$26, 2, -1} //魔法
- &on
- &wait 10
- %mandef(12)={$C , 1,$27, 2, -1} //魔法
- &on
- !o(1)j(2)老人j(0);無駄だというのに。pc
- %mandef(12)={$C , 1,$28, 2, -1} //魔法
- &on
- &contrast 0
- &wait 200
- &pcm 25
- &wait 300
- &move 0,62,2
- &on
- &contrast 15
- !o(1)j(2)???j(0);裏切りの王子よ、目覚めの時は近いぞ。;アザムの監獄でお
- !前が呼び出した力、我が力なり。p;再会を楽しみにしているぞ。;我が
- !息子よ。pc
- 進行=28
-
- &contrast 0
- &wait 200
- &goto IV17
-
- //━━━━━━━━━━━━━━━━━━━━━━
- //━━━━━━━━━━━━━━━━━━━━━━
- [IV19]//診療所前
- &if(進行==35){
- &bgm 13
- }
- &sppsp CHR\IV19.SPP
- &map MAP\IV19.MAP //マップの設定
- &mapsp MAP\MATI5.SP //BGの設定
- &mappal MAP\MATI5.PAL //BGパレットの設定
- %partypoint={0,0,2}
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1)={$3 , 0,$A0, 2, -1} //扉
- %mandef(2)={$3 , 0,$A4, 2, -1} //扉
- %mandef(10)={$A, 1,$00, 2, 0} //町人
- %mandef(11)={$9, 1,$04, 2, 0} //町人
- %mandef(12)={$B, 1,$08, 2, 0} //町人
- %mandef(13)={$F, 1,$20, 2, 3} //町人
- %mandef(14)={$A, 1,$40, 2, 2} //町人
- %mandef(15)={$F, 1,$60, 2, 2} //町人
-
- &if(進行==29){
- %mandef(4)={$B , 0,$40, 8, -1} //ルシェル
- %mandef(3)={$A , 0,$A9, 2, -1} //リアナ
- %mandef(7)={$9 , 0,$A8, 2, -1} //カリス
- %manpoint(7)={19,17}
- }&else{
- %mandef(5)={$C , 0,$60, 6, 0} //アゼル
- %mandef(6)={$C , 0,$80, 2, 0} //ダリア
- %manpoint(5)={1,16}
- %manpoint(6)={18,16}
- }
-
- &on
-
- &partymove -2,-2,-2
-
- &if(進行==29){
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);あ、wありました。w;オスカー診療所、
- %mandef(4)={$B , 0,$40, 8, 0} //ルシェル
- &on
- &manmove 4,-4
- %mandef(4)={$B , 0,$40, 8, -1} //ルシェル
- &on
- !ここです。;カリスさん。pc
- %mandef(7)={$9 , 0,$AA, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス
- !o(1)j(2)カリスj(0);よし、早くリアナを診てもらおう。pc
- &contrast 0
- &wait 200
- &goto CLINIC
- }
-
-
- // カリス診療所を出る。
- &if(進行==35){
- %mandef(1)={$3 , 0,$A1, 2, -1} //扉
- %mandef(2)={$3 , 0,$A5, 2, -1} //扉
- &on
- &wait 10
- %mandef(1)={$3 , 0,$A2, 2, -1} //扉
- %mandef(2)={$3 , 0,$A6, 2, -1} //扉
- &on
- &wait 10
- %mandef(1)={$3 , 0,$A3, 2, -1} //扉
- %mandef(2)={$3 , 0,$A7, 2, -1} //扉
- %mandef(7)={$9 , 0,$20, 2, -1} //カリス
- %manpoint(7)={22,11}
- &on
- &wait 50
- %mandef(7)={$9 , 0,$20, 2, 0} //カリス
- &on
- &manmove 7,2,2,2,2,-8
- %mandef(1)={$3 , 0,$A2, 2, -1} //扉
- %mandef(2)={$3 , 0,$A6, 2, -1} //扉
- &on
- &wait 10
- %mandef(1)={$3 , 0,$A1, 2, -1} //扉
- %mandef(2)={$3 , 0,$A5, 2, -1} //扉
- &on
- &wait 10
- %mandef(1)={$3 , 0,$A0, 2, -1} //扉
- %mandef(2)={$3 , 0,$A4, 2, -1} //扉
- &on
- &manmove 7,-2,2
- %mandef(7)={$9 , 0,$24, 2, -1} //カリス
- %mandef(6)={$C , 0,$80, 2, -1} //ダリア
- &on
-
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);おまたせ。pc
-
- %mandef(6)={$C , 0,$84, 2, -1} //ダリア
- &on
- &wait 10
- %mandef(6)={$C , 0,$85, 2, -1} //ダリア
- &on
- &wait 10
- %mandef(6)={$C , 0,$86, 2, -1} //ダリア
- &on
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);カリス、ほんとにいいの。;あなたの彼女が気が付
- !くまでそばにいなくて。pc
-
- %mandef(7)={$9 , 0,$00, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);彼女…。w;そんなんじゃ…。pc
- %mandef(6)={$C , 0,$8A, 2, -1} //ダリア
- &on
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);フフ、そうなの。p;
- %mandef(6)={$C , 0,$86, 2, -1} //ダリア
- &on
- !wルシェルから色々と聞いたわ。
- %mandef(7)={$9 , 0,$24, 2, -1} //カリス
- &on
- !;異端審問官に拷問を受けたそうね。;かわいそうに…。p;身内
- !の恥をさらすようだけど、近年の教会の腐敗は目に余るわ。p;
- !上流階級との癒着・賄賂、教会の地位を確立するための強引な
- !法の制定、異端審問もそのひとつ。p;そして、私たちも…。w;ど
- !うにかしなくてはならないわ…。pc
- &manmove 5,6,6,6,6,6,6,6,6,6,6,6,6,6,6
- %mandef(5)={$C , 0,$60, 6, -1} //アゼル
- %manpoint(5)={100,100}
- %mandef(8)={$C , 0,$68, 2, -1} //アゼル
- %manpoint(8)={15,16}
- %mandef(6)={$C , 0,$85, 2, -1} //ダリア
- &on
- &wait 10
- %mandef(6)={$C , 0,$87, 2, -1} //ダリア
- &on
- &wait 10
- %mandef(6)={$C , 0,$88, 2, -1} //ダリア
- &on
- &wait 10
- %mandef(6)={$C , 0,$89, 2, -1} //ダリア
- &on
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);カリス、w恋人との別れはもういいのかい。pc
- %mandef(7)={$9 , 0,$01, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ぬっ、だから…。pc
- %mandef(6)={$C , 0,$88, 2, -1} //ダリア
- &on
- &wait 10
- %mandef(6)={$C , 0,$84, 2, -1} //ダリア
- &on
- &wait 10
- %mandef(6)={$C , 0,$85, 2, -1} //ダリア
- &on
- &wait 10
- %mandef(6)={$C , 0,$86, 2, -1} //ダリア
- &on
- &wait 10
- %mandef(6)={$C , 0,$8A, 2, -1} //ダリア
- &on
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);あっ、w照れてる照れてるぅ。pc
- %mandef(8)={$C , 0,$6C, 2, -1} //アゼル
- &on
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);カリスってけっこう純なのか。w;うん、若さだよ
- !なあ。pc
- %mandef(7)={$9 , 0,$02, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);お、wお前ら。;それでも救世主かよっ!pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);まっ、一応ね。p;
- %mandef(8)={$C , 0,$68, 2, -1} //アゼル
- &on
- !さて、アルテガに送った使者が教会からの親書を運んできたよ。
- %mandef(7)={$9 , 0,$24, 2, -1} //カリス
- %mandef(6)={$C , 0,$85, 2, -1} //ダリア
- &on
- &wait 10
- %mandef(6)={$C , 0,$87, 2, -1} //ダリア
- &on
- &wait 10
- %mandef(6)={$C , 0,$88, 2, -1} //ダリア
- &on
- &wait 10
- %mandef(6)={$C , 0,$89, 2, -1} //ダリア
- &on
- !;それによると、騎士団が全滅したが、援軍は無し。ww;このまま
- !任務続行。;ということだ。pc
- %mandef(6)={$C , 0,$8B, 2, -1} //ダリア
- &on
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);教会は私たちを見捨てる気なの!pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);僕は、この遠征に出された時からそうだと思って
- !たけど。pc
- %mandef(6)={$C , 0,$8C, 2, -1} //ダリア
- &on
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);アゼルっ!pc
- %mandef(8)={$C , 0,$6D, 2, -1} //アゼル
- &on
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);ようするに僕等が死んでも、次の救世主をつくれ
- !ばいいってことなんだろ。pc
- %mandef(6)={$C , 0,$89, 2, -1} //ダリア
- &on
- &wait 10
- %mandef(6)={$C , 0,$8E, 2, -1} //ダリア
- &on
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);お飾りのうちはいいが、自分で動き出したら人形
- !ではない。pc
- %mandef(8)={$C , 0,$68, 2, -1} //アゼル
- &on
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);そう、教会の求めてる救世主ってのは、教会の意
- !のままに動く、なんの疑問も叛心も持たない人形なんだよ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);じゃあ、救世主って…。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);僕等は救世主でも何でもないかもしれないな。p;
- !ただいろんな偶然の中でこの世に生を受け、その偶然が人々に
- !奇跡と言われた。p;それを教会が力を得るのに利用するために
- !、僕等を救世主と担ぎ上げたわけさ。pc
- %mandef(6)={$C , 0,$8D, 2, -1} //ダリア
- &on
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);でも、私たちは自分の意志を持って教会の不正を
- !裁こうと動きだしたの。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);そして、結果がこの遠征ってわけだよ。p;だけど
- !、これはチャンスなのさ。;失敗すれば僕等は教会からうまい
- !こと消される。p;成功すれば教会内、いや外でも大きな力を得る
- !ことができるかもしれない。pc
- %mandef(6)={$C , 0,$89, 2, -1} //ダリア
- &on
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);そうすれば、すべてを変えられる…。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);とにかく行くしかないさ。pc
- %mandef(6)={$C , 0,$88, 2, -1} //ダリア
- &on
- &wait 10
- %mandef(6)={$C , 0,$84, 2, -1} //ダリア
- &on
- &wait 10
- %mandef(6)={$C , 0,$85, 2, -1} //ダリア
- &on
- &wait 10
- %mandef(6)={$C , 0,$86, 2, -1} //ダリア
- &on
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);カリス。w;私たちもけっこうわけ有りなのよ。pc
- %mandef(7)={$9 , 0,$03, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…オレは東大陸に渡りリザレアが在った地に行か
- !なくちゃならない。p;
- %mandef(7)={$9 , 0,$24, 2, -1} //カリス
- &on
- !東大陸にわたるにはあんたたちに付いてくしかないよ。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);ああ、ありがとう。pc
- %mandef(6)={$C , 0,$8A, 2, -1} //ダリア
- &on
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);ウフ。w;
- %mandef(6)={$C , 0,$85, 2, -1} //ダリア
- &on
- &wait 10
- %mandef(6)={$C , 0,$87, 2, -1} //ダリア
- &on
- &wait 10
- %mandef(6)={$C , 0,$88, 2, -1} //ダリア
- &on
- &wait 10
- %mandef(6)={$C , 0,$89, 2, -1} //ダリア
- &on
- !で、wアゼル、次は黄海砂漠ね。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);そうだ、旅人たちを悩ませている砂漠に発生する
- !霧の謎を解くのが次の任務だ。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);また、魔物の仕業かしら。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);特に死傷者は出てないが、旅人たちはその霧を恐
- !れて先に進むことができないらしいんだ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);まずは、南に向かうってことか。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);そうだ。pc
- &contrast 0
- &wait 200
- &partyset 1,5,6
- &complete
- 町中=1
- &goto MATI5
- }
-
- //━━━━━━━━━━━━━━━━━━━━━━
- //━━━━━━━━━━━━━━━━━━━━━━
- [IV20]//古代神殿跡
- &bgm 34
- &map MAP\IV20.MAP //マップの設定
- &mapsp MAP\IV20.SP //BGの設定
- &mappal MAP\IV20.PAL //BGパレットの設定
- %partypoint={4,35,2}
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1)={$9 , 0,$20, 2, -1} //カリス
- %mandef(3)={$C , 0,$A0, 2, -1} //アゼル
- %mandef(5)={$C , 0,$C0, 2, -1} //ダリア
-
- &pcm 21
- &on
-
- &wait 100
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);なんだ?w;今一瞬飛んだような…。;
- %mandef(1)={$9 , 0,$20, 2, 0} //カリス
- &on
- &manmove 1,-4,-2,-6,-2
- %mandef(1)={$9 , 0,$20, 2, -1} //カリス
- &on
- !それにここは!?pc
-
- %mandef(3)={$C , 0,$A0, 2, 0} //アゼル
- &on
- &manmove 3,-6
- %mandef(3)={$C , 0,$A0, 2, -1} //アゼル
- &on
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);どうやら壁を抜けたみたいだな。pc
- %mandef(5)={$C , 0,$C0, 2, 0} //ダリア
- &on
- &manmove 5,-4
- %mandef(5)={$C , 0,$C0, 2, -1} //ダリア
- &on
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);でも、ここからよ。p;結界のコアということは、術者がい
- !るってこと。;当然、私たちのことは気付いてる。;どこから来るか判か
- !らないわ。;注意して!pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);ちっ、厄介だな。pc
- %mandef(3)={$C , 0,$A0, 2, 0} //アゼル
- &on
- &manmove 3,-8
- %mandef(3)={$C , 0,$A0, 2, -1} //アゼル
- &on
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);だけど、なんだここは砂漠の真ん中のはずなのに、これは祭壇?w;魔法陣か?p;
- !黄海砂漠にこんな建造物は無いはずだが…。pc
- %mandef(1)={$9 , 0,$20, 2, 0} //カリス
- &on
- &manmove 1,-8
- %mandef(1)={$9 , 0,$20, 2, -1} //カリス
- %mandef(5)={$C , 0,$C0, 2, 0} //ダリア
- &on
- &manmove 5,-8
- %mandef(5)={$C , 0,$C0, 2, -1} //ダリア
- &on
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);たぶん術者が別の次元と結んでいるのよ。p;変な違和感を感じるもの。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);そんなことが出来るのか。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);普通の魔導師じゃ無理でしょうね。;それだけ相手が強力っ
- !てことだわ。pc
- %mandef(3)={$C , 0,$A0, 2, 0} //アゼル
- &on
- &manmove 3,-6
- %mandef(3)={$C , 0,$A0, 2, -1} //アゼル
- &on
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);魔導師か、ダリアどうにかなるか。pc
- %mandef(5)={$C , 0,$C0, 2, 0} //ダリア
- &on
- &manmove 5,-4
- %mandef(5)={$C , 0,$C0, 2, -1} //ダリア
- &on
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);私は魔法については基礎知識だけ、素質はあると言われた
- !ことがあるけど。p;教会では異端でしょ。;多少の回復術を使うことしか許
- !されないもの。p;ま、別のルートで習ったりはしてたけどね。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);とにかく相手が出てきてくれないことには、手の打ちよう
- !がないな。pc
- %mandef(1)={$9 , 0,$20, 2, 0} //カリス
- &on
- &manmove 1,-2
- %mandef(1)={$9 , 0,$20, 2, -1} //カリス
- &on
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);でも、まだ敵って決まった訳じゃないわ。p;さっきの化け
- !物も、ここに近付かせないために自動的に襲いかかってきた結界の一部
- !でしょうから。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);術者が結界を張った時点で付加されたものだから、術者に
- !悪意はないというのか。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);こんな砂漠で結界だかを張って、旅人を通さないようにし
- !てるんだ。;オレには悪意が無いなんて思えないぜ。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);ま、そうね…。pc
- &monsprint 21,32,アゼル,0
- &monsprint 93,32,カリス1,1
- &monsprint 165,32,ダリア,0
- !o(1)j(2)アゼル・カリス・ダリアj(0);!pc
- %mandef(3)={$C , 0,$A0, 2, 0} //アゼル
- &on
- &manmove 3,-8
- %mandef(3)={$C , 0,$A0, 2, -1} //アゼル
- %mandef(1)={$9 , 0,$20, 2, 0} //カリス
- &on
- &manmove 1,-8
- %mandef(1)={$9 , 0,$20, 2, -1} //カリス
- %mandef(5)={$C , 0,$C0, 2, 0} //ダリア
- &on
- &manmove 5,-8
- %mandef(5)={$C , 0,$C0, 2, -1} //ダリア
- &on
- &partymove 8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8
- &partymove -2,-4,-8,-6
- %mandef(7)={$E , 0,$E0, 2, -1} //アバロニクス
- %manpoint(7)={15,12}
- &on
- &pcm 35
- &wait 5
- %manpoint(7)={100,100}
- &on
- &wait 15
- %manpoint(7)={15,12}
- &on
- &wait 10
- %manpoint(7)={100,100}
- &on
- &wait 10
- %manpoint(7)={15,12}
- &on
- &wait 15
- &on
- %manpoint(7)={100,100}
- &on
- &wait 5
- %manpoint(7)={15,12}
- &on
- &wait 20
- %manpoint(7)={100,100}
- &on
- &wait 3
- %manpoint(7)={15,12}
- &on
- &wait 25
- %manpoint(7)={100,100}
- &on
- &wait 1
- %manpoint(7)={15,12}
- &on
-
- &monsprint 24,32,アバロニクス
- !o(1)j(2)不気味な男j(0);お待ちしておりましたよ双星のメシア殿。;…それと、
- !ん!ww b(8)お前は?;b(5)はっ、なんとも面白い組み合わせだ。p;主役
- !が揃っているとは。;これも、千年前の縁、星の巡り合わせか。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);きさまは…wwアバロニクス!?pc
- &monsprint 24,32,アバロニクス
- !o(1)j(2)アバロニクスj(0);我が名を覚えていて下さったか。;そうメシア殿が幼
- !き日にお逢いした魔竜アバロニクスですよ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(魔竜だって?)pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);あなた、何の目的でこんな。pc
- &monsprint 24,32,アバロニクス
- !o(1)j(2)アバロニクスj(0);貴方方のおかげで、もう用事は済みましたよ。p;あ
- !とは裏切りの王子の活躍に期待ですな。;さすればこの世界の未来への
- !道が開けましょう。pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);きさま、何を言っている!pc
- &monsprint 24,32,アバロニクス
- !o(1)j(2)アバロニクスj(0);メシア殿にも、いずれ判かりましょう。;ハハハ、
- %mandef(7)={$E , 0,$E1, 2, -1} //アバロニクス
- &on
- !ではごきげんよう。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(…裏切りの王子、w裏切りの王子、w夢で聞いた言葉。w;
- !そう夢の中でやつはオレのことを裏切りの王子と呼んだ…)p
- %mandef(1)={$9 , 0,$20, 2, 1} //カリス
- &on
- &manmove 1,8,8
- %mandef(1)={$9 , 0,$20, 2, -1} //カリス
- &on
- !o(1)j(2)カリスj(0);おいっ!w;待て!w
- %mandef(7)={$E , 0,$E0, 2, -1} //アバロニクス
- &on
- !;お前、オレのことを知っているのか?pc
- &monsprint 24,32,アバロニクス
- !o(1)j(2)アバロニクスj(0);ん、wああ、知っているともよーくな。;今のお
- !前では、その意味が判からないだろう。p;それはまあ刻が近いという
- !ことでもあるが…。;お前がすべてを手にした時、またあいまみえよう
- !ぞ。p;だが、その時今のお前の自我があるかは判からんがな。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);何を、w何を言っているんだ。w;教えろ、w教えてくれ!;
- !オレは何者なんだっ!pc
- &monsprint 24,32,アバロニクス
- !o(1)j(2)アバロニクスj(0);刻が近いと言っておるだろう。;それにヤツの楽しみ
- !の邪魔をしたくないのでな…。p
- !o(1)j(2)アバロニクスj(0);おお、そうだメシア殿の成長ぶりを少し拝見させて
- !もらいましょうか。w;
- %mandef(7)={$E , 0,$E2, 2, -1} //アバロニクス
- &on
- !いでよ、我がけん族、魔竜ゴルテコンガ。pc
- &pcm 34
- &freash $0001
- &monsprint 96,112,20_01
- &wait 7
- &monsprint 96,112,20_02
- &wait 7
- &monsprint 96,112,20_03
- &wait 7
- &monsprint 96,112,20_04
- &wait 7
- &monsprint 96,112,20_05
- &wait 7
- &monsprint 96,112,20_06
- %mandef(11)={$6 , 1,$A0, 2, -1} //ゴルテコンガ
- %mandef(12)={$6 , 1,$A1, 2, -1} //ゴルテコンガ
- %mandef(13)={$6 , 1,$A2, 2, -1} //ゴルテコンガ
- %mandef(14)={$6 , 1,$A3, 2, -1} //ゴルテコンガ
- %mandef(15)={$6 , 1,$C0, 2, -1} //ゴルテコンガ
- %mandef(16)={$6 , 1,$C1, 2, -1} //ゴルテコンガ
- %mandef(17)={$6 , 1,$C2, 2, -1} //ゴルテコンガ
- %mandef(18)={$6 , 1,$C3, 2, -1} //ゴルテコンガ
- %mandef(19)={$6 , 1,$E0, 2, -1} //ゴルテコンガ
- %mandef(20)={$6 , 1,$E1, 2, -1} //ゴルテコンガ
- %mandef(21)={$6 , 1,$E2, 2, -1} //ゴルテコンガ
- %mandef(22)={$6 , 1,$E3, 2, -1} //ゴルテコンガ
- %manpoint(11)={12,14}
- %manpoint(12)={14,14}
- %manpoint(13)={16,14}
- %manpoint(14)={18,14}
- %manpoint(15)={12,18}
- %manpoint(16)={14,18}
- %manpoint(17)={16,18}
- %manpoint(18)={18,18}
- %manpoint(19)={12,22}
- %manpoint(20)={14,22}
- %manpoint(21)={16,22}
- %manpoint(22)={18,22}
- &on
- &monsprint 96,112,消し
- &wait 5
-
- %mandef(7)={$E , 0,$E0, 2, -1} //アバロニクス
- &on
- &wait 100
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);な、なにっ!pc
- &monsprint 24,32,アバロニクス
- !o(1)j(2)アバロニクスj(0);さあメシア殿、この魔竜ゴルテコンガを見事倒して
- !下さい。p;少年、君も助太刀して構わないぞ。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);!…pc
- %manpoint(5)={100,100}
- %mandef(6)={$C , 0,$46, 2, -1} //ダリア
- %mandef(10)={$C , 0,$69, 2, -1} //ダリア
- %manpoint(6)={18,29}
- %manpoint(10)={16,29}
- &on
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);二人とも、ぼーっとしてないでっ!w;来るわよ!pc
- %manpoint(1)={100,100}
- %manpoint(3)={100,100}
- %mandef(2)={$9 , 0,$4E, 2, -1} //カリス
- %mandef(8)={$9 , 0,$4F, 2, -1} //カリス
- %mandef(4)={$C , 0,$44, 2, -1} //アゼル
- %mandef(9)={$C , 0,$68, 2, -1} //アゼル
- %manpoint(2)={15,25}
- %manpoint(8)={17,25}
- %manpoint(4)={12,28}
- %manpoint(9)={14,28}
- &on
- &wait 100
- &patternpal GR\CG3.PAL //モンスター用パレット
- &bgm 0
- &pcm 9
-
- &battle $1000,37,ゴルテコンガ,1
- &patternpal GR\CG.PAL //CG用パレット
- &if(%exitcode==1){&goto GAMEOVER} //全滅して終了
- &wait 10
- &pcm 12
- %mandef(11)={$6 , 1,$A0+4, 2, -1} //ゴルテコンガ
- %mandef(12)={$6 , 1,$A1+4, 2, -1} //ゴルテコンガ
- %mandef(13)={$6 , 1,$A2+4, 2, -1} //ゴルテコンガ
- %mandef(14)={$6 , 1,$A3+4, 2, -1} //ゴルテコンガ
- %mandef(15)={$6 , 1,$C0+4, 2, -1} //ゴルテコンガ
- %mandef(16)={$6 , 1,$C1+4, 2, -1} //ゴルテコンガ
- %mandef(17)={$6 , 1,$C2+4, 2, -1} //ゴルテコンガ
- %mandef(18)={$6 , 1,$C3+4, 2, -1} //ゴルテコンガ
- %mandef(19)={$6 , 1,$E0+4, 2, -1} //ゴルテコンガ
- %mandef(20)={$6 , 1,$E1+4, 2, -1} //ゴルテコンガ
- %mandef(21)={$6 , 1,$E2+4, 2, -1} //ゴルテコンガ
- %mandef(22)={$6 , 1,$E3+4, 2, -1} //ゴルテコンガ
- &on
- &wait 10
- %mandef(11)={$6 , 1,$A0+8, 2, -1} //ゴルテコンガ
- %mandef(12)={$6 , 1,$A1+8, 2, -1} //ゴルテコンガ
- %mandef(13)={$6 , 1,$A2+8, 2, -1} //ゴルテコンガ
- %mandef(14)={$6 , 1,$A3+8, 2, -1} //ゴルテコンガ
- %mandef(15)={$6 , 1,$C0+8, 2, -1} //ゴルテコンガ
- %mandef(16)={$6 , 1,$C1+8, 2, -1} //ゴルテコンガ
- %mandef(17)={$6 , 1,$C2+8, 2, -1} //ゴルテコンガ
- %mandef(18)={$6 , 1,$C3+8, 2, -1} //ゴルテコンガ
- %mandef(19)={$6 , 1,$E0+8, 2, -1} //ゴルテコンガ
- %mandef(20)={$6 , 1,$E1+8, 2, -1} //ゴルテコンガ
- %mandef(21)={$6 , 1,$E2+8, 2, -1} //ゴルテコンガ
- %mandef(22)={$6 , 1,$E3+8, 2, -1} //ゴルテコンガ
- &on
- &wait 10
- %mandef(11)={$6 , 1,$A0+12, 2, -1} //ゴルテコンガ
- %mandef(12)={$6 , 1,$A1+12, 2, -1} //ゴルテコンガ
- %mandef(13)={$6 , 1,$A2+12, 2, -1} //ゴルテコンガ
- %mandef(14)={$6 , 1,$A3+12, 2, -1} //ゴルテコンガ
- %mandef(15)={$6 , 1,$C0+12, 2, -1} //ゴルテコンガ
- %mandef(16)={$6 , 1,$C1+12, 2, -1} //ゴルテコンガ
- %mandef(17)={$6 , 1,$C2+12, 2, -1} //ゴルテコンガ
- %mandef(18)={$6 , 1,$C3+12, 2, -1} //ゴルテコンガ
- %mandef(19)={$6 , 1,$E0+12, 2, -1} //ゴルテコンガ
- %mandef(20)={$6 , 1,$E1+12, 2, -1} //ゴルテコンガ
- %mandef(21)={$6 , 1,$E2+12, 2, -1} //ゴルテコンガ
- %mandef(22)={$6 , 1,$E3+12, 2, -1} //ゴルテコンガ
- &on
- &wait 10
- %manpoint(11)={100,100}
- %manpoint(12)={100,100}
- %manpoint(13)={100,100}
- %manpoint(14)={100,100}
- %manpoint(15)={100,100}
- %manpoint(16)={100,100}
- %manpoint(17)={100,100}
- %manpoint(18)={100,100}
- %manpoint(19)={100,100}
- %manpoint(20)={100,100}
- %manpoint(21)={100,100}
- %manpoint(22)={100,100}
- &on
- &bgm 34
- &wait 50
- %mandef(7)={$E , 0,$E3, 2, -1} //アバロニクス
- &on
- &monsprint 24,32,アバロニクス
- !o(1)j(2)アバロニクスj(0);さすがですよ、メシア殿。w;少年もなかなかの腕前
- !だ。p;
- %mandef(7)={$E , 0,$E0, 2, -1} //アバロニクス
- &on
- !では、またお会いしましょう。pc
- %manpoint(7)={100,100}
- &on
- &pcm 35
- &wait 5
- %manpoint(7)={15,12}
- &on
- &wait 15
- %manpoint(7)={100,100}
- &on
- &wait 10
- %manpoint(7)={15,12}
- &on
- &wait 10
- %manpoint(7)={100,100}
- &on
- &wait 15
- &on
- %manpoint(7)={15,12}
- &on
- &wait 5
- %manpoint(7)={100,100}
- &on
- &wait 20
- %manpoint(7)={15,12}
- &on
- &wait 3
- %manpoint(7)={100,100}
- &on
- &wait 25
- %manpoint(7)={15,12}
- &on
- &wait 1
- %manpoint(7)={100,100}
- &on
-
- &contrast 0
- %mandef(23)={$9 , 0,$20, 8, -1} //カリス
- %mandef(24)={$C , 0,$A0, 8, -1} //アゼル
- %mandef(25)={$C , 0,$C0, 8, -1} //ダリア
- %manpoint(23)={15,25}
- %manpoint(24)={12,28}
- %manpoint(25)={18,29}
- %manpoint(2)={100,100}
- %manpoint(8)={100,100}
- %manpoint(4)={100,100}
- %manpoint(9)={100,100}
- %manpoint(6)={100,100}
- %manpoint(10)={100,100}
- &on
- &bgm -1
- &wait 200
- &pcm 21
- &goto IV20B
-
- //━━━━━━━━━━━━━━━━━━━━━━
- //━━━━━━━━━━━━━━━━━━━━━━
- [IV20B]//古代神殿跡
- &map MAP\IV20B.MAP //マップの設定
- &mapsp MAP\IV20.SP //BGの設定
- &mappal MAP\IV20.PAL //BGパレットの設定
- %partypoint={4,15,2}
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1)={$9 , 0,$20, 8, -1} //カリス
- %mandef(3)={$C , 0,$A0, 8, -1} //アゼル
- %mandef(5)={$C , 0,$C0, 8, -1} //ダリア
-
- &on
- &wait 100
- &partymove 2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
- &partymove -2,-4,-8,-6
- &partymove -2,-4,-8,-6
-
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);消えたか…。pc
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);くそーっ、なんなんだ一体っ!p;
- !刻が近いだと、ヤツは何を言っているんだ。;あの悪夢、
- !wあの悪夢は本当にオレの記憶なのか…。p;ちきしょー、w自分のことだ
- !というのに…。;オレはなんなんだっ!pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);カリスっ!pc
- &wait 150
- %mandef(1)={$9 , 0,$20, 2, 0} //カリス
- &on
- &manmove 1,-2
- %mandef(1)={$9 , 0,$20, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…あ、wああ、すまない。;少し興奮しただけだ。p;大丈夫
- !、w…もう大丈夫だ。pc
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);(アバロニクス。;あいついったい。;カリスにも何か重要
- !な運命があるの?)pc
- %mandef(3)={$C , 0,$A0, 2, 0} //アゼル
- &on
- &manmove 3,-6
- %mandef(3)={$C , 0,$A0, 2, -1} //アゼル
- &on
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);ちっ、w竜め。;いちいち意味ありげなことを…。;アレの動
- !きも気になるが、霧も無くなったようだし、リーナスへ向かおう。pc
- %mandef(5)={$C , 0,$C0, 2, 0} //ダリア
- &on
- &manmove 5,-4
- %mandef(5)={$C , 0,$C0, 2, -1} //ダリア
- &on
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);…そうね。w;もう特に問題はないみたいだし。pc
- %mandef(1)={$9 , 0,$20, 2, 0} //カリス
- &on
- &manmove 1,2,2
- %mandef(1)={$9 , 0,$20, 2, -1} //カリス
- &on
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);…アゼル、ダリア、ヤツはいったい。;教えてくれないか。
- !pc
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);ああ、ともかくリーナスへ行こう。;ヤツのことはそこで話
- !すよ。p;僕も考えを少し整理しておきたいんでね。p
- %mandef(3)={$C , 0,$A0, 2, 0} //アゼル
- &on
- &manmove 3,-2
- %mandef(3)={$C , 0,$A0, 2, -1} //アゼル
- &on
- !o(1)j(2)アゼルj(0);(ヤツの言っていた用事とは…w先の化け物どもか?w;そう
- !、ちょっと妙な感覚だったな。;ヤツの目的は…)pc
-
- 進行=38
- &contrast 0
- &wait 200
- &goto2 FIELD,38,163,2
-
- //━━━━━━━━━━━━━━━━━━━━━━
- //━━━━━━━━━━━━━━━━━━━━━━
- [IV21]//メシアの回想1 リーナスの宿
- &if(進行==39){&bgm 36}
- &sppsp CHR\MISE.SPP //SPP(人/スプライト)ファイルを設定
- &map MAP\IV21.MAP //マップの設定
- &mapsp MAP\YADO.SP //BGの設定
- &mappal MAP\YADO.PAL //BGパレットの設定
- %partypoint={8,3,2}
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1)={$9 , 0,$83, 2, -1} //カリス
- %mandef(2)={$C , 0,$84, 2, -1} //アゼル
- %mandef(3)={$C , 0,$85, 2, -1} //ダリア
-
- &on
- &wait 100
-
- &if(進行==39){
- &monsprint 160,32,アゼル
- !o(1)j(2)アゼルj(0);w…そう、あれは僕等が10歳ぐらいの時だ…。pc
- &contrast 0
- &wait 200
- &goto IV22
- }
-
- &monsprint 160,32,アゼル
- !o(1)j(2)アゼルj(0);ヤツが現れたのは、その一度きりだったが、強烈に印象に
- !残っている。pc
- &monsprint 160,32,ダリア
- !o(1)j(2)ダリアj(0);そして、アバロニクスが言ったように、私たちはあの壁を
- !越えて、今ここにいる。p;運命を変えるために。pc
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);…そのヤツが何故、あんな砂漠のど真ん中に居たんだ。p;
- !しかも、2人を待っていたような口ぶりだった。pc
- &monsprint 160,32,アゼル
- !o(1)j(2)アゼルj(0);判からない。w;僕等があそこへ行くことが、ヤツにとって
- !何か重要な意味を持っていたのかもしれない。p;どちらにしろヤツの目
- !的が見えない。pc
- %mandef(3)={$C , 0,$86, 2, -1} //ダリア
- &on
- &monsprint 160,32,ダリア
- !o(1)j(2)ダリアj(0);異界への扉を開く…。w;異界ってなんなの…。w;魔竜の故
- !郷…?w;わからない。pc
- &monsprint 160,32,アゼル
- !o(1)j(2)アゼルj(0);異界か…。pc
- %mandef(3)={$C , 0,$86, 2, -1} //ダリア
- %mandef(1)={$9 , 0,$87, 2, -1} //カリス
- &on
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);…そう、w魔竜…、w魔竜だ。w;
- %mandef(2)={$C , 0,$89, 2, -1} //アゼル
- %mandef(3)={$C , 0,$8A, 2, -1} //ダリア
- &on
- !オレは以前、魔竜と名乗る
- !ものと戦ったことがある。p;シャーマンたちが護る聖剣の洞窟、そこに
- !聖剣の守護者として一匹の竜がいたんだ。pc
- %mandef(3)={$C , 0,$88, 2, -1} //ダリア
- &on
- &monsprint 160,32,ダリア
- !o(1)j(2)ダリアj(0);聖剣!w;あの伝説の5つの剣が実在しているというの?w;
- !もしそうだとしたら。p;そのカリスが戦ったっていう魔竜がアバロ
- !ニクスの仲間だとしたら、アバロニクスは聖剣の絶対の力を利用しよう
- !としているの?pc
- %mandef(3)={$C , 0,$8A, 2, -1} //ダリア
- &on
- &monsprint 160,32,アゼル
- !o(1)j(2)アゼルj(0);しかし、聖剣は伝説にすぎないだろう。w;そんな神の御技
- !のような神器が存在するものなのか。pc
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);…そこにあったのは1本だけだったが、確かにそういう神
- !がかったもの、w力を感じた。pc
- %mandef(3)={$C , 0,$85, 2, -1} //ダリア
- &on
- &monsprint 160,32,ダリア
- !o(1)j(2)ダリアj(0);聖剣・w魔竜・w異界、wすべてを結び付けるのには、わから
- !ないことだらけだわ。p;もっと情報が必要…。pc
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);…そうみたいだけど。pc
- &monsprint 160,32,アゼル
- !o(1)j(2)アゼルj(0);そう、wそしてもう一つの謎は君だ、カリス。p;アバロニ
- !クスは君について色々知っているようだった。;君は一体何者なんだ。p
- !c
- %mandef(3)={$C , 0,$86, 2, -1} //ダリア
- &on
- &monsprint 160,32,ダリア
- !o(1)j(2)ダリアj(0);…裏切りの王子か。pc
- %mandef(1)={$9 , 0,$87, 2, -1} //カリス
- &on
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);…夢で不気味な声がオレに向かって言っていた。
- %mandef(3)={$C , 0,$8A, 2, -1} //ダリア
- &on
- !;だけどそ
- !の声の主が誰なのか?p;その夢、w一人の少女を殺す、wあの悪夢の意味
- !が何なのか?;オレには全然わからないんだ。p;
- %mandef(1)={$9 , 0,$8B, 2, -1} //カリス
- &on
- !…ただ、wただ怖いだけ
- !なんだよ。;何も、w何も思い出せない自分が、w闇の中にいる自分が…。
- !pc
- &monsprint 160,32,アゼル
- !o(1)j(2)アゼルj(0);…記憶喪失。w;まあ、そうだな。;とにかく東大陸に渡り
- !、リザレアを探そう。p;そこに行けば、カリスの記憶回復のきっかけが
- !つかめるかもしれない。pc
- %mandef(3)={$C , 0,$85, 2, -1} //ダリア
- &on
- &monsprint 160,32,ダリア
- !o(1)j(2)ダリアj(0);そうね。w;そうすれば、アバロニクスのことも何か判かる
- !かも知れないわ。pc
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);…。pc
- %mandef(3)={$C , 0,$8A, 2, -1} //ダリア
- &on
- &monsprint 160,32,ダリア
- !o(1)j(2)ダリアj(0);大丈夫よ、wそんなに心配しなくても、私たちが付いている
- !わ。;
- %mandef(3)={$C , 0,$8C, 2, -1} //ダリア
- &on
- !なんてたって私たちはメシア様なんだからね。pc
- &monsprint 160,32,アゼル
- !o(1)j(2)アゼルj(0);そう、w大丈夫だ。w;知り合ったばかりだけど、君はアンヌ
- !の森で僕等を助けてくれた命の恩人だ。p;決して悪いようにはさせない
- !よ。pc
- %mandef(1)={$9 , 0,$83, 2, -1} //カリス
- &on
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);…2人とも、ありがとう。pc
- %mandef(3)={$C , 0,$8D, 2, -1} //ダリア
- &on
- &monsprint 160,32,ダリア
- !o(1)j(2)ダリアj(0);フフ。w;さあもう寝ましょうか。pc
- %mandef(3)={$C , 0,$85, 2, -1} //ダリア
- %mandef(2)={$C , 0,$84, 2, -1} //アゼル
- &on
- &monsprint 160,32,アゼル
- !o(1)j(2)アゼルj(0);明日は船の手配やら、教会への報告を済ませて、船の準備
- !が出来次第、東大陸へ出発だ。pc
- &monsprint 160,32,カリス1
- !o(1)j(2)カリスj(0);ああ。pc
-
- &bgm -1
- &contrast 0
- &wait 150
- &bgm 16
- &complete
- &wait 500
- &goto YADO
-
- //━━━━━━━━━━━━━━━━━━━━━━
- //━━━━━━━━━━━━━━━━━━━━━━
- [IV22]//メシアの回想2 黄金色の草原
- &map MAP\IV22.MAP //マップの設定
- &mapsp MAP\IV22.SP //BGの設定
- &mappal MAP\IV22.PAL //BGパレットの設定
- %partypoint={0,16,2}
- &partyspeed 2
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- %mandef(1)={$C , 0,$C0, 2, -1} //ダリア
- %mandef(2)={$C , 0,$A0, 2, 0} //アゼル
-
- &on
- &manmove 2,2,2
- %mandef(1)={$C , 0,$C0, 2, 0} //ダリア
- &manmove 1,2
- %mandef(1)={$C , 0,$C5, 2, -1} //ダリア
- &on
- !o(1)j(2)ダリアj(0);アゼルぅー、w待ってよぉ!pc
- %mandef(1)={$C , 0,$C0, 2, -1} //ダリア
- %mandef(2)={$C , 0,$A4, 2, -1} //アゼル
- &on
- !o(1)j(2)アゼルj(0);ダリアー、早く来いよぉ!pc
- %mandef(1)={$C , 0,$C0, 2, 0} //ダリア
- &on
- &manmove 1,2,2,2,2,2,2,2,2,2
- %mandef(1)={$C , 0,$C6, 2, -1} //ダリア
- &on
- !o(1)j(2)ダリアj(0);はぁwはぁ。w;
- %mandef(1)={$C , 0,$C0, 2, -1} //ダリア
- &on
- !ねぇ、いいものってなあに?w;もういいでし
- !ょ、教えてよぉ。pc
- %mandef(2)={$C , 0,$A5, 2, -1} //アゼル
- &on
- !o(1)j(2)アゼルj(0);へへぇ、w外に出るんだ。w;ここから逃げるんだ!pc
- %mandef(2)={$C , 0,$A4, 2, -1} //アゼル
- %mandef(1)={$C , 0,$C7, 2, -1} //ダリア
- &on
- !o(1)j(2)ダリアj(0);ええっー!w;どうやって出るのぉ?w;周りはおっきい壁が
- !立ってるんだよぉ、w大人だって見張ってるのにー。pc
- %mandef(1)={$C , 0,$C0, 2, -1} //ダリア
- %mandef(2)={$C , 0,$A5, 2, -1} //アゼル
- &on
- !o(1)j(2)アゼルj(0);壁に穴を見つけたんだよ。w;自由になれるんだぁ。pc
- %mandef(2)={$C , 0,$A4, 2, -1} //アゼル
- %mandef(1)={$C , 0,$C8, 2, -1} //ダリア
- &on
- !o(1)j(2)ダリアj(0);自由ぅ?p;
- %mandef(1)={$C , 0,$C9, 2, -1} //ダリア
- &on
- !じゃあもうカミリオ先生の授業を受けなくてい
- !いのぉ?w;にんじんも食べなくていい?w;カミリオ先生もにんじんも大
- !嫌い!pc
- %mandef(1)={$C , 0,$C0, 2, -1} //ダリア
- %mandef(2)={$C , 0,$A5, 2, -1} //アゼル
- &on
- !o(1)j(2)アゼルj(0);うんっ、w外に出れば、吊り目のカミリオ先生もいないし、
- !にんじんも食べなくていいんだぁ。pc
- %mandef(2)={$C , 0,$A4, 2, -1} //アゼル
- %mandef(1)={$C , 0,$CA, 2, -1} //ダリア
- &on
- !o(1)j(2)ダリアj(0);わぁ!w;すごいすごい!pc
- %mandef(2)={$C , 0,$A6, 2, -1} //アゼル
- %mandef(1)={$C , 0,$C0, 2, -1} //ダリア
- &on
- !o(1)j(2)アゼルj(0);へへぇん、すごいだろ。p;
- %mandef(2)={$C , 0,$A4, 2, -1} //アゼル
- &on
- !さ、wあっちだよ。;あっちの壁に穴が開いてるのを見つけたんだぁ。pc
- %mandef(2)={$C , 0,$A0, 2, 0} //アゼル
- &on
- &manmove 2,2,2,2,2,2,2,2,2,2,2
- %mandef(2)={$C , 0,$A4, 2, -1} //アゼル
- &on
- %mandef(1)={$C , 0,$C0, 2, 0} //ダリア
- &on
- &manmove 1,2,2,2,2,2,2,2,2,2,2
- %mandef(1)={$C , 0,$C6, 2, -1} //ダリア
- &on
- %mandef(2)={$C , 0,$A0, 2, 0} //アゼル
- &on
- &manmove 2,2,2,2,2,2,2,2,2,2,2,2,2,2
- %mandef(2)={$C , 0,$A0, 2, -1} //アゼル
- &on
- %mandef(1)={$C , 0,$C0, 2, 0} //ダリア
- &on
- &manmove 1,2,2,2,2,2,2,2,2,2,2,2,2,2
- %mandef(1)={$C , 0,$C0, 2, -1} //ダリア
- &on
- &partymove 2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
- &partymove -2,-4,-8,-6
- &partymove -2,-4,-8,-6
- &partymove -2,-4,-8,-6
- !o(1)j(2)アゼルj(0);ほらね!pc
- %mandef(1)={$C , 0,$CA, 2, -1} //ダリア
- &on
- !o(1)j(2)ダリアj(0);ほんとだぁ!;アゼル、すごいすごい!pc
-
- %mandef(3)={$E , 0,$E0, 2, -1} //アバロニクス
- %manpoint(3)={15,26}
- &on
- &wait 5
- %manpoint(3)={100,100}
- &on
- &wait 15
- %manpoint(3)={15,26}
- &on
- &wait 10
- %manpoint(3)={100,100}
- &on
- &wait 10
- %manpoint(3)={15,26}
- &on
- &wait 15
- &on
- %manpoint(3)={100,100}
- &on
- &wait 5
- %manpoint(3)={15,26}
- &on
- &wait 20
- %manpoint(3)={100,100}
- &on
- &wait 3
- %manpoint(3)={15,26}
- &on
- &wait 25
- %manpoint(3)={100,100}
- &on
- &wait 1
- %manpoint(3)={15,26}
- &on
- !o(1)j(2)アバロニクスj(0);どこへ行くのですかな、メシア殿。pc
- %mandef(2)={$C , 0,$A4, 2, -1} //アゼル
- %mandef(1)={$C , 0,$C4, 2, -1} //ダリア
- &on
- !o(1)j(2)ダリアj(0);わぁ!pc
- %mandef(1)={$C , 1,$60, 2, 0} //ダリア
- &on
- &manmove 1,2,2,2
- %mandef(1)={$C , 0,$CB, 2, -1} //ダリア
- %mandef(2)={$C , 0,$A7, 2, -1} //アゼル
- &on
- !o(1)j(2)アゼルj(0);な、w何だよ、お前ー!pc
- !o(1)j(2)ダリアj(0);もう見つかっちゃったの!?pc
- !o(1)j(2)アゼルj(0);違う、wコイツ違うよ!pc
- !o(1)j(2)ダリアj(0);アゼルぅ、恐いよぉ。pc
- %mandef(3)={$E , 0,$E0, 2, 0} //アバロニクス
- &on
- &manmove 3,2,2,2,2
- %mandef(3)={$E , 0,$E0, 2, -1} //アバロニクス
- &on
- !o(1)j(2)アバロニクスj(0);運命から逃げてはなりませんぞ。p;ここで外に出た
- !ところで、貴方方はまだ子供、大人に騙されどこぞに売られるだけの惨
- !めな人生しか送れない。p;それよりも、力を蓄えなさい。;運命を変え
- !たいと言うならそれからにしなさい。p;貴方方の力はまだ微弱過ぎる
- !。;それでは困るのです。p;異界への扉を、我が故郷への扉を開いてもら
- !わなければ…。pc
- !o(1)j(2)アゼルj(0);な、w何を言ってるんだよ。w;なんなんだよぉ!pc
- !o(1)j(2)アバロニクスj(0);…とにかく、wこの壁を越えるのはまだ早いのですよ。
- !pc
- !o(1)j(2)アゼルj(0);やっぱり、お前も教皇の手下だな。p;もうこん
- !なとこ嫌なんだ!w;ここを出て、ダリアと暮らすんだ!pc
- !o(1)j(2)ダリアj(0);アゼルぅ…。pc
-
- %mandef(3)={$E , 0,$E4, 2, -1} //アバロニクス
- %mandef(4)={$F , 1,$00, 2, 0} //神官騎士
- %mandef(5)={$F , 1,$20, 2, 0} //神官騎士
- %mandef(6)={$F , 1,$40, 2, 0} //神官騎士
- %manpoint(4)={15,18}
- %manpoint(5)={10,18}
- %manpoint(6)={20,18}
- &on
- &manmove 5,2,2,2,2,2,2,2
- %mandef(5)={$F , 1,$24, 2, -1} //神官騎士
- &on
- &manmove 6,2,2,2,2,2,2,2
- %mandef(6)={$F , 1,$44, 2, -1} //神官騎士
- &on
- !o(1)j(2)騎士j(0);アゼル様!w;ダリア様!pc
- &manmove 4,2,2,2,2,2
- %mandef(4)={$F , 1,$04, 2, -1} //神官騎士
- &on
- !o(1)j(2)騎士j(0);きさまっ、なにやつだ、お二人から離れろっ!pc
- %mandef(3)={$E , 0,$E0, 2, -1} //アバロニクス
- &on
- !o(1)j(2)アバロニクスj(0);おっと、お迎えが参りましたな。p;いずれこの壁を
- !越える時期がきます。;それまでお待ちなさい。p;
- %mandef(3)={$E , 0,$E5, 2, -1} //アバロニクス
- &on
- !我が名は魔竜アバロニクス、どうかお見知り置きを。p;
- %mandef(3)={$E , 0,$E0, 2, -1} //アバロニクス
- &on
- !それではまたいつかお逢いしましょう。;メシア殿…。pc
- // アバロニクス消える。
- %mandef(3)={$E , 0,$E0, 2, -1} //アバロニクス
- %manpoint(3)={100,100}
- &on
- &wait 5
- %manpoint(3)={15,30}
- &on
- &wait 15
- %manpoint(3)={100,100}
- &on
- &wait 10
- %manpoint(3)={15,30}
- &on
- &wait 10
- %manpoint(3)={100,100}
- &on
- &wait 15
- &on
- %manpoint(3)={15,30}
- &on
- &wait 5
- %manpoint(3)={100,100}
- &on
- &wait 20
- %manpoint(3)={15,30}
- &on
- &wait 3
- %manpoint(3)={100,100}
- &on
- &wait 25
- %manpoint(3)={15,30}
- &on
- &wait 1
- %manpoint(3)={100,100}
- &on
- &partymove -2,-4,-8,-6
- &partymove -2,-4,-8,-6
-
- %mandef(4)={$F , 1,$05, 2, -1} //神官騎士
- %mandef(5)={$F , 1,$25, 2, -1} //神官騎士
- %mandef(6)={$F , 1,$45, 2, -1} //神官騎士
- &on
- !o(1)j(2)騎士j(0);き、消えた!pc
- !o(1)j(2)騎士j(0);はっ、
- %mandef(4)={$F , 1,$00, 2, 0} //神官騎士
- &on
- &manmove 4,2,2,2,2
- %mandef(4)={$F , 1,$00, 2, -1} //神官騎士
- %mandef(5)={$F , 1,$20, 2, -1} //神官騎士
- %mandef(6)={$F , 1,$40, 2, -1} //神官騎士
- &on
- !お二人ともお怪我などございませぬか。pc
- !o(1)j(2)騎士j(0);あのような怪しい者が入り込むとは、警備を強めるように報
- !告せねば…。pc
- %mandef(2)={$C , 0,$A4, 2, -1} //アゼル
- &on
- !o(1)j(2)アゼルj(0);(…アバロニクス)pc
- 進行=40
- &contrast 0
- &wait 200
- &goto IV21
-
- //━━━━━━━━━━━━━━━━━━━━━━
- //━━━━━━━━━━━━━━━━━━━━━━
- [IV23]//カリス 船上
- &partyset 0
- &bgm 32
- &sppsp CHR\CHR02.SPP
- &map MAP\IV23.MAP //マップの設定
- &mapsp MAP\IV23.SP //BGの設定
- &mappal MAP\IV23.PAL //BGパレットの設定
- &patternpal GR\END.PAL //モンスター用パレット
- %partypoint={0,0,2}
-
-
- &wait 300
- &on
- // カリスとアゼル、ダリアを乗せた船は東大陸へ向けて進み出した。
- // だが、カリスの心は複雑であった。確かに東大陸、リザレアに向かえば自分の記
- // 憶が、過去が取り戻せるかもしれない。しかし、それを得た時、自分はどうなっ
- // てしまうのか。船は進み出していたが、カリスはそこから逃げ出したいという思
- // いにも駆られていたのだ。
- &wait 100
- &monsprint 8,8,23_1,0
- &monsprint 0,80,フェード1,0
- &wait 10
- &monsprint 0,80,フェード2,0
- &wait 10
- &monsprint 0,80,フェード3,0
- &wait 10
- &monsprint 0,80,フェード4,0
- &wait 10
- &monsprint 0,80,フェード5,0
- &wait 10
- &monsprint 0,80,フェード6,0
- &wait 200
- &monsprint 0,80,フェード5,0
- &wait 10
- &monsprint 0,80,フェード4,0
- &wait 10
- &monsprint 0,80,フェード3,0
- &wait 10
- &monsprint 0,80,フェード2,0
- &wait 10
- &monsprint 0,80,フェード1,0
- &wait 10
- &monsprint 0,80,フェード0,0
- &wait 50
-
- &monsprint 0,0,消し,1
- &monsprint 128,0,消し,1
-
- &patternpal GR\CG.PAL
- &monsprint 24,32,カリス1
- !o(1)j(2)カリスj(0);(リザレア、wそこに行けばオレがわかるのか?ww;その時、
- !オレは今のオレでいられるのか…)wwwc
- &wait 150
- &patternpal GR\END.PAL
- &monsprint 8,8,23_2,1
- &monsprint 0,80,フェード1,1
- &wait 10
- &monsprint 0,80,フェード2,1
- &wait 10
- &monsprint 0,80,フェード3,1
- &wait 10
- &monsprint 0,80,フェード4,1
- &wait 10
- &monsprint 0,80,フェード5,1
- &wait 10
- &monsprint 0,80,フェード6,1
- &wait 200
- &monsprint 0,80,フェード5,1
- &wait 10
- &monsprint 0,80,フェード4,1
- &wait 10
- &monsprint 0,80,フェード3,1
- &wait 10
- &monsprint 0,80,フェード2,1
- &wait 10
- &monsprint 0,80,フェード1,1
- &wait 10
- &monsprint 0,80,フェード0,1
- &wait 50
-
- &monsprint 0,0,消し,0
- &monsprint 128,0,消し,0
-
- &patternpal GR\CG.PAL
- &monsprint 24,32,アゼル
- !o(1)j(2)アゼルj(0);(東大陸、今だ未開の地。w;この地にはいくつかの少数部
- !族が住むといわれている。;彼らは僕らをどう迎えてくれるだろう)wwwc
- &wait 100
- &monsprint 24,32,ダリア
- !o(1)j(2)ダリアj(0);(港で聞いたあの噂。w;各国の王族等が何者かに誘拐され
- !ているらしいって言う。ww;ガデリッシュ、アザム、ゴール、リカミカ、
- !クレイニル、これは何かしらの陰謀?www;そういえばアザムの王子はカリ
- !スと言う名前だったかしら、まさかとは思うけど…。www;とにかく、w彼に
- !ついてはもう少し様子を見ましょう)wwwc
- &wait 100
- &contrast 0
- &wait 200
- &goto IV24
-
- //━━━━━━━━━━━━━━━━━━━━━━
- //━━━━━━━━━━━━━━━━━━━━━━
- [IV24]//リアナ 船上
- &map MAP\IV24.MAP //マップの設定
- &mapsp MAP\IV24.SP //BGの設定
- &mappal MAP\IV24.PAL //BGパレットの設定
- &patternpal GR\END.PAL
- %partypoint={31,0,2}
-
-
- &on
- // そしてリアナとルシェルもまた船の上であった。リアナのその目はおのが目的を
- // 持った、以前の彼女には見られなかった、どことなく厳しい眼差しであった。彼
- // 女もまた何かを得るため進みだそうとしている。
-
- &wait 100
- &monsprint 8,8,24_1,1
- &monsprint 0,80,フェード1,1
- &wait 10
- &monsprint 0,80,フェード2,1
- &wait 10
- &monsprint 0,80,フェード3,1
- &wait 10
- &monsprint 0,80,フェード4,1
- &wait 10
- &monsprint 0,80,フェード5,1
- &wait 10
- &monsprint 0,80,フェード6,1
- &wait 200
- &monsprint 0,80,フェード5,1
- &wait 10
- &monsprint 0,80,フェード4,1
- &wait 10
- &monsprint 0,80,フェード3,1
- &wait 10
- &monsprint 0,80,フェード2,1
- &wait 10
- &monsprint 0,80,フェード1,1
- &wait 10
- &monsprint 0,80,フェード0,1
- &wait 50
-
- &monsprint 0,0,消し,0
- &monsprint 128,0,消し,0
-
-
- &patternpal GR\CG.PAL
- &monsprint 24,32,リアナ1
- !o(1)j(2)リアナj(0);(そう、あたしがカリスに付いてきたのは、カリスを助け
- !たい気持ちもあったけど…。ww;それよりも自分を変えたい、w試したい
- !気持ちがあったんだわ…。ww;あたしのやるべきこと、wあたしだけにし
- !かできない事を確かめたい。www;カリス…、w絶対また会えるよね)wwwc
- &wait 150
-
- &monsprint 24,32,ルシェル
- !o(1)j(2)ルシェルj(0);(私にはもう帰る場所が無い…。ww;このままリアナさん
- !に付いていくしかないわ。ww;これもすべて神の思し召し、神が私に課し
- !た試練なのかしら)wwwc
-
- &contrast 0
- &wait 300
- &goto END
- //━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
- [END]//次回へ
- &bgm 0
- &map MAP\NULL.MAP //マップの設定
- &mapsp MAP\IV01.SP //BGの設定
- &mappal MAP\IV01.PAL //BGパレットの設定
- &patternpal GR\END.PAL
- %partypoint={31,0,2}
-
- // PAL,BANK, SP,向き(10KEY),動き(-1:静止,0:足踏み,1~:ランダム移動)
- // %mandef(1)={$4 , 2,$20, 2, -1} //ポール
-
-
- &on
- &contrast 0
- &wait 200
- &monsprint 24,32,END_0
- &contrast 15
- &wait 300
- &monsprint 88,64,END_1
- &wait 200
- &monsprint 8,96,END_2
- &wait 300
- &monsprint 56,128,END_3
- &wait 200
- &monsprint 24,160,END_4
- &wait 500
- &monsprint 0,208,END_5
- &wait 300
-
- &contrast 0
- &wait 300
- &monsprint 0,0,消し
- &monsprint 0,128,消し
- &monsprint 128,0,消し
- &monsprint 128,128,消し
-
- &monsprint 88,96,NEXT_1
- &contrast 15
- &wait 300
- &contrast 0
- &wait 200
- &monsprint 88,96,消し
- &monsprint 56,64,NEXT_2
- &monsprint 88,96,NEXT_3
- &monsprint 96,128,NEXT_4
- &pcm 1
- &contrast 15
- &wait 400
- &contrast 0
- &wait 200
-
- &end //ゲーム終了
-
- やった!やったよー!
-
- ふぉーう ふぉーう
-
-
- // 野望
-
- // LOST SOUL ACT.3-4 3でまとめたいけど…
-
- // LOST SOUL ACT.3 ~ 魔 ~
-
- 取り戻した記憶
- 縛られた魂
- 愛しいものを奪われし刻…
- 2つに判れし糸が結ばれる
- 力を得る旅
- 夢の使者
- 覚醒
- 恐怖
- 闇の解放
- 旅立つ者
- 異界の王
-
- // LOST SOUL ACT.4(END) ~ 波 ~
-
- 長き争いへの終止符
- 癒されぬ痛み
- 復讐
- 再会
- 愛しき者をその胸に抱き…
- 罪は償われる。
-
-
- // 星の魔女(仮) ACT・RPG
- あの娘の本当の姿。
- // ヤヌスの庭 箱庭SLG
- ゲームシステムだけで余計なストーリーを削った単純に遊べるモノを目
- 指す。
- // すてきなおうち(仮) コレクトRPG
- あの娘のヤツです。仲間(家族と友達)がテーマなのです。
- // BLUE WINGS STG・RPG
- アルシャークに感銘を受けた高校時代からの…。
- やっぱ宇宙だよなぁ。
- 少年の心の成長と、主人公を取り巻く人々の主人公に対する感情の変化
- がテーマ。
- // ??? バトルSLG
- 戦後の大陸、闘技場は元傭兵や腕を余していた者たちで賑わっていた。
- 戦災孤児の主人公は仲間を集め大陸中を巡っていく。
- 若者の夢をテーマに。
- // ワールド RPGに限らないけど。
- 世の中にはたくさんRPGというかゲームというか色々な世界というも
- のが作られているけれど、世界を作るってそんな簡単で一時なことなので
- しょうか。もっと重厚な設定がなされた世界の中で多くのシナリオを作っ
- ていくような企画が出来たらなぁ。けっこうソーサリアンとかってこんな
- 思想なのかな。やったことないけどね。
- 社会科の教科書作くんなきゃなぁ。
- 1つの世界をテーマにゲームを作り続けているメーカーとかチームって無
- いのかなぁ。1つの世界を作るなんて、例え空想の中でも一生掛ける価値
- があると思う。
- // シャララ堂(仮) ミュージカルゲーム
- 歌って踊るゲーム。
- 楽しくなきゃね。
- 要FLIPFRAP?
-
- 等々
-
- RPGばっかじゃん。とうぶんRPGはやりたくないですけど。
- って企画書かかなきゃねぇ…
-